/******************************************************
 SAS実践問題集           by K.T.

問題番号の後の()内のアルファベットは難易度をしめす。
Aは入門,Bは初級,Cは中級...と後の文字程難しい
prac97_03.SAS Ver1.3 1997/12/03 16:15:28
*******************************************************/
PROC FORMAT;
  VALUE fmtsex 1='男' 2='女';
  VALUE fmtjob 1='学生・生徒' 2='教育・研究・技術職' 3='技能・作業職'
               4='管理・事務職' 5='販売員・サービス従業者' 6='自営業' 7='主婦'
               8='その他・無職';
  VALUE fmtad 1100='札幌' 1202='函館' 1203='小樽' 1204='旭川' 1205='室蘭'
              1206='釧路' 1207='帯広' 1208='北見' 1210='岩見沢' 1213='苫小牧'
              1214='稚内' 1216='芦別' 1217='江別' 1219='紋別' 1220='士別'
              1223='根室'   1224='千歳' 1230='登別' 1231='恵庭' 1301='広島町'
              1302='石狩町' 1346='八雲町' 1400='倶知安町' 1408='余市町'
              1484='羽幌町' 1551='留辺蕊町' 1555='遠軽町' 1578='白老町'
              1631='音更町' 1999='北海道郡部' 2202='青森弘前市'
              4100='宮城仙台市' 6201='山形市' 7201='福島市' 8201='茨城水戸市'
              8217='茨城取手市' 11204='埼玉浦和市' 11228='埼玉志木市'
              11236='埼玉上福岡市' 11999='埼玉郡部' 12100='千葉市'
              12217='千葉柏市' 12227='千葉浦安市' 13100='東京特別区'
              13201='東京八王子市' 13206='東京府中市' 13209='東京町田市'
              13214='東京国分寺市' 13228='東京あきる野市'
              14100='横浜市' 14130='神奈川川崎市' 14201='横須賀市'
              14208='神奈川逗子市'14213='神奈川大和市' 15201='新潟市'
              16201='富山市' 16202='富山高岡市' 17201='石川金沢市'
              17203='石川小松市' 18203='福井武生市' 21204='岐阜多治見市'
              21214='岐阜可児市' 21999='岐阜郡部' 22201='静岡市'
              22446='静岡菊川町' 22999='静岡郡部' 23100='名古屋'
              23202='愛知岡崎市' 23203='愛知一宮市' 23211='愛知豊田市'
              23223='愛知大府市' 23226='愛知尾張旭市'
              23302='愛知東郷町' 24202='三重四日市市' 24203='三重伊勢市'
              24205='三重桑名市' 25206='滋賀草津市' 25343='滋賀野洲町'
              26100='京都市' 26204='京都宇治市' 26206='京都亀岡市'
              26209='京都長岡京市' 27100='大阪市' 27201='大阪堺市'
              27203='大阪豊中市' 27207='大阪高槻市' 27211='大阪茨木市'
              27216='大阪河内長野市' 28100='神戸市' 28201='兵庫姫路市'
              28204='兵庫西宮市' 28207='兵庫伊丹市' 28209='兵庫豊岡市'
              28214='兵庫宝塚市' 28217='兵庫川西市' 29201='奈良市'
              29203='奈良大和郡山市' 29204='奈良天理市' 29209='奈良生駒市'
              29999='奈良郡部' 30201='和歌山市' 32999='島根郡部'
              33201='岡山市' 33202='岡山倉敷市' 33999='岡山郡部'
              34100='広島市' 35203='山口市' 35999='山口郡部' 36201='徳島市'
              37202='香川丸亀市' 37203='香川坂出市' 37205='香川観音寺市'
              40100='福岡北九州市' 40130='福岡市' 41201='佐賀市' 44201='大分市';
  VALUE fmtsq 1='速度に関すること' 2='姿勢に関すること' 3='歩幅に関すること'
              4='手の振りに関すること' 5='足の運びに関すること' 6='その他'
              0='無し';
  VALUE fmtqs 1='速度に関すること' 2='姿勢に関すること' 3='歩幅に関すること'
              4='手の振りに関すること' 5='足の運びに関すること' 6='その他'
              0='無し';
/*
Q1(B)
変数a1からa6までと変数c1からc17までの回答が以下のように4水準になっている
(それぞれfmta,fmtbに示されている)。1と2を一まとめ,3と4を一まとめにして
2水準に変更したい。
さあ,どうする?
*/
  VALUE fmta 1='いつもある' 2='ときどきある' 3='あまりない' 4='まったくない';
  VALUE fmtb 0='注目しない' 1='注目する';
  VALUE fmtc 1='気になる' 2='少し気になる' 3='あまり' 4='気にならない';
/*
Q2(B)
このプログラムのフォーマットは煩雑で見ずらい。よく見ると内容が相当重複している
(例えば,以下のfmtdとfmteのように)。これらの冗長な部分を削ぎ落として,すっ
きりとしたプログラムにしたい。さあ,どうする?
*/
  VALUE fmtd 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmte 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtf 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtg  1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmth 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmti 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtj 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtk 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtl 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtm 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtn 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmto 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtp 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtq 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtr 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmts 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtt 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
  VALUE fmtu 1='消極的' 2='積極的' 3='攻撃的' 4='クール' 5='無能' 6='有能'
             7='頭が良い' 8='のんびり' 9='頭が悪い' 10='自信がない'
             11='自信がある' 12='おとなしい' 13='都会の人' 14='暗い'
             15='元気' 16='優柔不断'
             17='意思が強い' 18='マイペース' 19='上品' 20='だらしがない'
             21='プライドが高い' 22='せっかち' 23='忙しい' 24='偉そう' 25='怠け者'
             26='内向的' 27='優しい' 28='落ち着きがある' 29='落ち着きがない'
             30='誠実' 31='さわやか' 32='真面目' 33='目立ちたがり'
             34='リズム感がある' 35='おおざっぱ' 36='見栄っ張り' 37='神経質'
             38='うるさい' 39='ロマンティク' 40='変人' 41='こだわらない' 60='関西の人'
             61='東京の人' 62='障害がありそう' 63='若者' 64='老人' 65='中年'
             66='女子高校生' 67='男' 68='女' 69='子ども' 70='スポーツマン'
             71='ビジネスマン' 72='やくざ' 73='太っている人' 74='身長の大きな人'
             0='特に無し'
             80='好意的なその他' 81='否定的なその他' 82='中立的その他';
RUN;
DATA hoko1;
  INFILE 'sample.dat';
  INPUT id sex age ad job a1-a6 sq1 sq2 qs1 qs2 b1-b6 c1-c17
        d1-d3 e1-e3 f1-f3 g1-g3 h1-h3 i1-i3 j1-j3 k1-k3 l1-l3
        m1-m3 n1-n3 o1-o3 p1-p3 q1-q3 r1-r3 s1-s3 t1-t3 u1-u3;

  FORMAT sex fmtsex. job fmtjob. ad fmtad. sq1-sq2 fmtsq. qs1-qs2 fmtqs.
         a1-a6 fmta. b1-b6 fmtb. c1-c17 fmtc. d1-d3 fmtd. e1-e3 fmte.
         f1-f3 fmtf. g1-g3 fmtg. h1-h3 fmth. i1-i3 fmti. j1-j3 fmtj.
         k1-k3 fmtk. l1-l3 fmtl. m1-m3 fmtm. n1-n3 fmtn. o1-o3 fmto.
         p1-p3 fmtp. q1-q3 fmtq. r1-r3 fmtr. s1-s3 fmts. t1-t3 fmtt.
         u1-u3 fmtu.;
  LABEL id='番号' sex='性別' age='歳' job='属性' ad='5年前の居住地'
        a1='歩き方はその人の性格や特徴をあらわす'
        a2='歩き方を変えれば自分の気持ちが変わる'
        a3='自分の歩き方が気になる' a4='自分の歩き方が他人と違うと感じる'
        a5='自分の歩き方について注意される' a6='他人の歩き方について注意する'
        sq1='自分の歩き方について注意されるてん'
        sq2='自分の歩き方について注意されるてん'
        qs1='他人の歩き方について注意するてん'
        qs2='他人の歩き方について注意するてん'
        b1='歩く速さに注目する' b2='手の振り具合に注目する'
        b3='肩の揺れに注目する' b4='姿勢に注目する'
        b5='首の傾きに注目する' b6='ひざの開き具合に注目する'
        c1='姿勢が悪い' c2='うつむいて歩いている'
        c3='腰が引けている' c4='お腹を突き出している'
        c5='不自然な動作が入る' c6='べた足で歩いている'
        c7='足を引きずっている' c8='内股・外股で歩いている'
        c9='腕の振りがアンバランス' c10='上半身を左右に揺らしている'
        c11='全体に力が抜けている' c12='リズムが乱れている'
        c13='不自然に肩に力が入っている' c14='服装や身だしなみ・髪型が変'
        c15='キョロキョロしている' c16='表情が不自然'
        c17='動きが鈍い' d1='歩くのが速い人' d2='歩くのが速い人'
        d3='歩くのが速い人' e1='かかとをすって歩く人' e2='かかとをすって歩く人'
        e3='かかとをすって歩く人' f1='猫背で歩く人' f2='猫背で歩く人'
        f3='猫背で歩く人' g1='ゆったりと歩く人' g2='ゆったりと歩く人'
        g3='ゆったりと歩く人' h1='背筋を伸ばして歩く人'
        h2='背筋を伸ばして歩く人' h3='背筋を伸ばして歩く人'
        i1='前身が横揺れして歩く人' i2='前身が横揺れして歩く人'
        i3='前身が横揺れして歩く人' j1='がに股歩きの人'
        j2='がに股歩きの人' j3='がに股歩きの人' k1='ひざを曲げたまま歩く人'
        k2='ひざを曲げたまま歩く人' k3='ひざを曲げたまま歩く人'
        l1='モデルのように歩く人' l2='モデルのように歩く人'
        l3='モデルのように歩く人' m1='うつむいて歩く人' m2='うつむいて歩く人'
        m3='うつむいて歩く人' n1='歩くのが遅い人' n2='歩くのが遅い人'
        n3='歩くのが遅い人' o1='せかせか歩きの人' o2='せかせか歩きの人'
        o3='せかせか歩きの人' p1='手を大きく振って歩く人'
        p2='手を大きく振って歩く人' p3='手を大きく振って歩く人'
        q1='ドスドス歩きの人' q2='ドスドス歩きの人'
        q3='ドスドス歩きの人' r1='足をひきずって歩く人'
        r2='足をひきずって歩く人' r3='足をひきずって歩く人'
        s1='前身を上下動させて歩く人' s2='前身を上下動させて歩く人'
        s3='前身を上下動させて歩く人' t1='ピョンピョン歩きの人'
        t2='ピョンピョン歩きの人' t3='ピョンピョン歩きの人'
        u1='さっそうと歩く人' u2='さっそうと歩く人'u3='さっそうと歩く人';
/*
Q3(A)
歳を10代,20代,30代,40代,50代とそれ以上のグループに分けて分析したい。IF文を重ねる
と間違いやすいのでSELECT文を使って処理しなさい。
*/
RUN;
/*
Q4(A)
オブザベーションがidごとに並んで存在しているか,オブザベーションの漏れがないか
確かめたい。さあ,どうする?
*/

/*
Q5(E)
変数がd1からu3まである。これを,d1.d2.d3を一括して新たに変数dにまとめ,
e1.e2.e3を一括して新たに変数eにまとめ,...このように,複数の変数(の値を)を
一つの変数にまとめて集計したいと思う(複数回答の集計という)。
そのようにして,d〜uまでの度数を集計しなさい。さあ,どうする?
*/

/*
Q6(D)
TABULATEを使って男女ごとの変数a1からa6の集計結果を見やすい形にまとめなさい。
以下のようになっているとよい。
-------------------------------------------------
|性別|     a1      |     a2      |     a3      |
|    |-------------+-------------+-------------+-
|    |ある群|ない群|ある群|ない群|ある群|ない群|   ....
|----+------+------+------+------+------+------+-
|男  |     9|     1|    10|     .|     5|     5|
|----+------+------+------+------+------+------+-
|女  |    14|     1|    13|     2|    13|     2|
-------------------------------------------------
*/

/*
Q7(C)
いよいよ分析です。d1からu3まで,類似性のある項目はどれかを調べなさい。
ここでは,PROC CLUSTER)を使用しなさい。
*/

/* -----------  以下prac7_03.dat -----------------------------------------
1 1 47 1100 4 2 2 3 2 2 4 0 0 0 0 1 0 0 1 0 0 2 3 3 3 2 4 2 4 2 3 3 3 3 2 2 2 3 3 0 0 20 0 0 81 0 0 8 0 0 30 32 0 62 0 0 67 0 0 27 0 0 19 21 36 10 14 0 8 0 0 23 0 0 15 0 0 3 0 0 0 0 0 15 0 0 82 0 0 11 0 0
2 2 24 12100 8 2 2 3 2 1 1 1 0 1 0 1 0 0 0 0 0 1 1 2 3 1 4 2 4 4 4 4 4 4 4 1 1 2 22 0 0 82 0 0 0 0 0 8 0 0 11 0 0 15 0 0 73 0 0 0 0 0 19 0 0 0 0 0 18 0 0 18 0 0 11 0 0 3 0 0 62 0 0 0 0 0 5 9 0 2 0 0
3 2 53 12100 7 2 2 2 3 2 3 1 0 0 0 1 0 0 1 0 0 2 2 1 1 2 2 2 2 3 2 3 3 3 3 2 3 3 15 23 63 20 65 66 5 64 65 36 64 0 6 15 21 24 35 0 70 0 0 62 64 0 21 63 68 10 14 0 12 62 64 3 0 0 15 69 0 27 35 0 62 64 0 15 69 0 15 69 0 2 3 6
4 2 45 13100 8 1 2 3 3 3 3 0 0 0 0 1 0 0 0 0 0 2 2 3 3 4 3 3 3 4 4 4 4 4 4 4 4 4 2 0 0 20 0 0 10 0 0 8 0 0 4 0 0 20 0 0 10 0 0 10 0 0 21 0 0 14 0 0 8 0 0 2 0 0 11 0 0 16 0 0 20 0 0 18 0 0 22 0 0 11 0 0
5 1 25 11228 8 2 2 2 2 2 2 2 5 2 0 1 1 0 1 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 22 0 0 81 0 0 81 0 0 28 0 0 11 0 0 62 0 0 81 0 0 62 0 0 0 0 0 0 0 0 62 0 0 0 0 0 0 0 0 0 0 0 62 0 0 34 0 0 0 0 0 6 0 0
6 2 23 13100 8 2 2 2 3 3 3 0 0 0 0 0 0 0 1 0 0 2 2 3 3 2 3 1 2 3 3 2 2 3 2 2 2 3 22 0 0 62 0 0 82 0 0 80 0 0 82 0 0 34 0 0 0 0 0 62 0 0 19 0 0 10 14 0 8 0 0 22 0 0 8 0 0 72 0 0 62 0 0 34 0 0 82 0 0 21 0 0
7 1 21 27207 1 1 2 3 2 2 3 2 0 0 0 0 0 0 1 0 0 2 1 3 1 1 2 2 4 3 2 3 1 2 1 2 3 2 23 0 0 0 0 0 81 0 0 8 0 0 31 0 0 0 0 0 70 0 0 0 0 0 19 0 0 14 0 0 14 0 0 22 0 0 15 0 0 72 0 0 62 0 0 62 0 0 5 9 0 19 0 0
8 2 19 21999 1 2 2 2 3 2 2 5 0 2 0 0 0 0 1 0 1 1 2 2 2 1 2 1 1 1 1 2 1 1 1 1 1 2 23 0 0 25 0 0 0 0 0 8 0 0 19 0 0 0 0 0 20 0 0 40 0 0 80 0 0 14 0 0 8 0 0 0 0 0 15 0 0 72 0 0 20 0 0 62 0 0 62 0 0 11 0 0
9 1 21 1100 1 1 1 1 1 2 2 2 0 2 0 1 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 4 60 9 5 0 9 14 20 8 12 18 4 6 13 5 9 62 3 20 72 5 9 66 4 19 21 8 14 18 1 10 14 13 60 61 2 11 15 5 20 72 5 9 62 5 9 62 5 9 38 11 60 61
10 2 20 1100 1 1 1 1 1 3 3 0 0 0 0 1 1 1 0 1 1 1 1 1 1 1 1 1 2 1 1 1 3 1 1 1 1 1 3 22 60 14 20 66 9 14 68 11 12 18 6 13 19 5 9 20 5 62 72 14 66 68 2 39 0 14 20 26 5 12 14 3 60 61 11 21 32 9 20 72 36 38 25 5 9 40 5 9 62 4 7 13
11 1 18 1100 1 1 1 1 1 1 1 1 2 4 5 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 4 13 22 9 14 66 10 20 68 8 12 31 11 30 32 5 9 20 9 35 72 20 40 66 4 19 39 14 0 0 8 32 0 2 60 0 11 15 32 24 72 73 9 62 64 5 9 40 9 20 62 4 11 21
12 2 27 13100 1 1 1 1 1 2 1 6 4 2 1 1 0 1 1 1 0 1 1 2 3 1 1 1 1 1 2 1 2 1 1 3 1 2 4 0 0 20 35 38 14 0 0 12 0 0 2 0 0 20 62 0 20 72 73 63 66 68 21 39 0 14 25 0 25 0 0 3 60 0 31 33 0 38 65 72 20 62 0 5 9 0 5 9 66 39 0 0
13 2 19 1100 1 1 1 1 1 1 1 1 2 4 5 1 0 1 1 1 1 1 1 1 1 1 1 1 1 4 1 1 1 1 1 1 2 1 22 0 0 9 66 0 14 68 0 12 18 0 13 0 0 9 69 0 66 72 0 62 66 0 19 0 0 14 0 0 5 0 0 4 13 0 2 15 0 72 0 0 9 62 0 5 9 0 5 9 0 2 6 0
14 1 18 28204 1 1 1 3 3 3 2 0 0 0 0 0 0 0 0 1 0 1 1 1 3 1 2 2 3 2 1 2 2 3 2 1 1 2 60 0 0 20 0 0 0 0 0 19 0 0 81 0 0 29 0 0 5 0 0 5 0 0 11 0 0 14 0 0 64 0 0 13 0 0 15 0 0 5 0 0 14 0 0 5 0 0 3 9 0 4 0 0
15 2 19 41201 1 2 3 2 3 2 3 2 6 0 0 1 0 0 0 0 1 2 3 2 1 1 2 1 1 1 1 1 1 2 1 1 2 3 23 0 0 62 0 0 0 0 0 35 0 0 70 0 0 70 0 0 67 0 0 62 0 0 21 0 0 2 0 0 5 0 0 0 0 0 0 0 0 3 0 0 62 0 0 0 0 0 20 0 0 4 0 0
16 1 18 30201 1 2 2 3 3 3 3 0 0 0 0 1 0 0 0 0 0 2 3 1 1 1 1 1 2 1 2 1 1 2 1 2 1 2 23 0 0 62 0 0 0 0 0 0 0 0 30 32 0 73 0 0 5 9 0 36 37 0 0 0 0 5 9 0 73 0 0 0 0 0 5 0 0 65 0 0 4 0 0 9 0 0 9 0 0 0 0 0
17 2 20 29204 1 2 2 2 3 3 4 0 0 0 0 1 0 0 1 1 0 1 1 2 2 1 2 3 1 3 3 2 2 3 1 2 2 3 23 0 0 82 0 0 14 0 0 8 0 0 17 31 0 72 0 0 28 0 0 81 0 0 19 0 0 14 0 0 8 0 0 22 29 0 15 0 0 33 36 0 62 0 0 2 0 0 20 29 0 60 0 0
18 1 26 1100 2 2 2 4 4 3 4 0 0 0 0 0 0 0 1 0 0 1 2 3 3 1 3 2 4 2 2 3 1 3 4 1 3 3 13 61 0 0 0 0 1 14 0 8 18 81 0 0 0 0 0 0 0 0 0 0 0 0 11 19 21 14 0 0 0 0 0 0 0 0 11 15 0 0 0 0 62 0 0 0 0 0 9 0 0 0 0 0
19 1 33 12217 2 3 2 2 3 3 3 0 0 0 0 1 0 0 0 0 0 2 2 3 3 2 3 1 2 1 1 3 2 3 2 3 2 3 22 0 0 0 0 0 14 0 0 18 0 0 15 0 0 20 0 0 0 0 0 0 0 0 21 0 0 14 0 0 20 0 0 10 0 0 15 0 0 2 0 0 20 0 0 5 0 0 5 0 0 2 0 0
20 2 35 1203 7 1 2 1 1 3 1 0 0 6 0 0 0 0 1 0 0 2 2 2 3 2 1 1 3 3 2 2 2 2 2 2 2 3 3 0 0 70 0 0 10 0 0 8 81 0 11 0 0 62 0 0 62 0 0 62 0 0 80 0 0 10 14 0 18 0 0 1 0 0 15 0 0 73 0 0 62 0 0 62 0 0 62 0 0 80 0 0
21 2 24 1100 4 1 2 1 1 2 3 2 0 0 0 0 0 0 1 0 0 2 2 2 3 3 3 2 2 3 2 3 3 3 2 2 3 4 22 0 0 0 0 0 1 0 0 18 0 0 7 0 0 8 0 0 70 0 0 0 0 0 11 0 0 14 0 0 18 0 0 10 0 0 15 0 0 3 0 0 18 0 0 15 0 0 15 0 0 2 0 0
22 1 44 1207 4 2 2 2 2 3 3 0 0 0 0 1 0 0 1 0 0 2 2 2 3 2 3 2 3 2 2 2 2 3 2 2 2 3 3 22 0 20 0 0 10 74 0 8 18 0 19 21 0 62 0 0 62 0 0 0 0 0 21 0 0 10 26 0 18 32 0 10 0 0 11 15 0 33 36 0 20 0 0 0 0 0 5 9 0 11 0 0
23 2 50 14130 3 2 3 2 3 3 3 0 0 0 0 1 1 0 1 0 0 1 1 3 2 1 4 3 3 2 2 2 2 3 3 2 3 3 2 22 0 20 0 0 32 74 0 8 0 0 11 0 0 22 0 0 40 0 0 81 0 0 21 0 0 10 0 0 8 18 0 22 23 0 8 0 0 3 0 0 15 62 0 29 0 0 29 0 0 6 0 0
24 2 51 1100 4 2 2 2 3 3 4 0 0 0 0 1 1 0 1 0 0 2 2 3 3 2 2 2 3 2 2 2 2 2 3 1 1 3 2 15 23 20 0 0 10 0 0 8 18 0 11 80 0 62 0 0 3 62 0 10 0 0 4 21 0 1 10 0 8 0 0 3 22 0 11 15 0 3 24 35 0 0 0 15 0 0 5 9 0 6 11 0
25 2 50 26204 7 3 2 1 4 3 4 0 0 0 0 0 0 0 1 0 0 1 2 2 3 2 1 1 2 4 3 3 3 4 2 2 2 2 80 0 0 20 0 0 1 20 0 8 0 0 15 0 0 9 0 0 5 0 0 20 0 0 21 0 0 11 0 0 14 0 0 22 0 0 8 0 0 20 0 0 16 0 0 15 0 0 15 0 0 11 0 0
*/

戻る  進む  ホームページへ
mailto: toyomura@hokusei.ac.jp
home page: http://www.ipc.hokusei.ac.jp/~z00105/index.html