* Encoding: UTF-8. ***************************** *Written by Kimberly Fisher * *CTUR, University of Oxford * *13 October 2016 * *****************************. *add additional time with animals from time with domestic animals; redo errors in some *time use variables, improve data cleaning. get SAS DATA='E:\MTUS-archive\Spain\2002-2003\di.sas7bdat'. save outfile='C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\mtus data\countries\Spain\2002-03\original-diary.sav' /keep IDHOGAR NPERS POSPO DDIASEM APRIN1 APRIN2 APRIN3 APRIN4 APRIN5 APRIN6 APRIN7 APRIN8 APRIN9 APRIN10 APRIN11 APRIN12 APRIN13 APRIN14 APRIN15 APRIN16 APRIN17 APRIN18 APRIN19 APRIN20 APRIN21 APRIN22 APRIN23 APRIN24 APRIN25 APRIN26 APRIN27 APRIN28 APRIN29 APRIN30 APRIN31 APRIN32 APRIN33 APRIN34 APRIN35 APRIN36 APRIN37 APRIN38 APRIN39 APRIN40 APRIN41 APRIN42 APRIN43 APRIN44 APRIN45 APRIN46 APRIN47 APRIN48 APRIN49 APRIN50 APRIN51 APRIN52 APRIN53 APRIN54 APRIN55 APRIN56 APRIN57 APRIN58 APRIN59 APRIN60 APRIN61 APRIN62 APRIN63 APRIN64 APRIN65 APRIN66 APRIN67 APRIN68 APRIN69 APRIN70 APRIN71 APRIN72 APRIN73 APRIN74 APRIN75 APRIN76 APRIN77 APRIN78 APRIN79 APRIN80 APRIN81 APRIN82 APRIN83 APRIN84 APRIN85 APRIN86 APRIN87 APRIN88 APRIN89 APRIN90 APRIN91 APRIN92 APRIN93 APRIN94 APRIN95 APRIN96 APRIN97 APRIN98 APRIN99 APRIN100 APRIN101 APRIN102 APRIN103 APRIN104 APRIN105 APRIN106 APRIN107 APRIN108 APRIN109 APRIN110 APRIN111 APRIN112 APRIN113 APRIN114 APRIN115 APRIN116 APRIN117 APRIN118 APRIN119 APRIN120 APRIN121 APRIN122 APRIN123 APRIN124 APRIN125 APRIN126 APRIN127 APRIN128 APRIN129 APRIN130 APRIN131 APRIN132 APRIN133 APRIN134 APRIN135 APRIN136 APRIN137 APRIN138 APRIN139 APRIN140 APRIN141 APRIN142 APRIN143 APRIN144 ASECU1 ASECU2 ASECU3 ASECU4 ASECU5 ASECU6 ASECU7 ASECU8 ASECU9 ASECU10 ASECU11 ASECU12 ASECU13 ASECU14 ASECU15 ASECU16 ASECU17 ASECU18 ASECU19 ASECU20 ASECU21 ASECU22 ASECU23 ASECU24 ASECU25 ASECU26 ASECU27 ASECU28 ASECU29 ASECU30 ASECU31 ASECU32 ASECU33 ASECU34 ASECU35 ASECU36 ASECU37 ASECU38 ASECU39 ASECU40 ASECU41 ASECU42 ASECU43 ASECU44 ASECU45 ASECU46 ASECU47 ASECU48 ASECU49 ASECU50 ASECU51 ASECU52 ASECU53 ASECU54 ASECU55 ASECU56 ASECU57 ASECU58 ASECU59 ASECU60 ASECU61 ASECU62 ASECU63 ASECU64 ASECU65 ASECU66 ASECU67 ASECU68 ASECU69 ASECU70 ASECU71 ASECU72 ASECU73 ASECU74 ASECU75 ASECU76 ASECU77 ASECU78 ASECU79 ASECU80 ASECU81 ASECU82 ASECU83 ASECU84 ASECU85 ASECU86 ASECU87 ASECU88 ASECU89 ASECU90 ASECU91 ASECU92 ASECU93 ASECU94 ASECU95 ASECU96 ASECU97 ASECU98 ASECU99 ASECU100 ASECU101 ASECU102 ASECU103 ASECU104 ASECU105 ASECU106 ASECU107 ASECU108 ASECU109 ASECU110 ASECU111 ASECU112 ASECU113 ASECU114 ASECU115 ASECU116 ASECU117 ASECU118 ASECU119 ASECU120 ASECU121 ASECU122 ASECU123 ASECU124 ASECU125 ASECU126 ASECU127 ASECU128 ASECU129 ASECU130 ASECU131 ASECU132 ASECU133 ASECU134 ASECU135 ASECU136 ASECU137 ASECU138 ASECU139 ASECU140 ASECU141 ASECU142 ASECU143 ASECU144 SOLO1 SOLO2 SOLO3 SOLO4 SOLO5 SOLO6 SOLO7 SOLO8 SOLO9 SOLO10 SOLO11 SOLO12 SOLO13 SOLO14 SOLO15 SOLO16 SOLO17 SOLO18 SOLO19 SOLO20 SOLO21 SOLO22 SOLO23 SOLO24 SOLO25 SOLO26 SOLO27 SOLO28 SOLO29 SOLO30 SOLO31 SOLO32 SOLO33 SOLO34 SOLO35 SOLO36 SOLO37 SOLO38 SOLO39 SOLO40 SOLO41 SOLO42 SOLO43 SOLO44 SOLO45 SOLO46 SOLO47 SOLO48 SOLO49 SOLO50 SOLO51 SOLO52 SOLO53 SOLO54 SOLO55 SOLO56 SOLO57 SOLO58 SOLO59 SOLO60 SOLO61 SOLO62 SOLO63 SOLO64 SOLO65 SOLO66 SOLO67 SOLO68 SOLO69 SOLO70 SOLO71 SOLO72 SOLO73 SOLO74 SOLO75 SOLO76 SOLO77 SOLO78 SOLO79 SOLO80 SOLO81 SOLO82 SOLO83 SOLO84 SOLO85 SOLO86 SOLO87 SOLO88 SOLO89 SOLO90 SOLO91 SOLO92 SOLO93 SOLO94 SOLO95 SOLO96 SOLO97 SOLO98 SOLO99 SOLO100 SOLO101 SOLO102 SOLO103 SOLO104 SOLO105 SOLO106 SOLO107 SOLO108 SOLO109 SOLO110 SOLO111 SOLO112 SOLO113 SOLO114 SOLO115 SOLO116 SOLO117 SOLO118 SOLO119 SOLO120 SOLO121 SOLO122 SOLO123 SOLO124 SOLO125 SOLO126 SOLO127 SOLO128 SOLO129 SOLO130 SOLO131 SOLO132 SOLO133 SOLO134 SOLO135 SOLO136 SOLO137 SOLO138 SOLO139 SOLO140 SOLO141 SOLO142 SOLO143 SOLO144 MENOR1 MENOR2 MENOR3 MENOR4 MENOR5 MENOR6 MENOR7 MENOR8 MENOR9 MENOR10 MENOR11 MENOR12 MENOR13 MENOR14 MENOR15 MENOR16 MENOR17 MENOR18 MENOR19 MENOR20 MENOR21 MENOR22 MENOR23 MENOR24 MENOR25 MENOR26 MENOR27 MENOR28 MENOR29 MENOR30 MENOR31 MENOR32 MENOR33 MENOR34 MENOR35 MENOR36 MENOR37 MENOR38 MENOR39 MENOR40 MENOR41 MENOR42 MENOR43 MENOR44 MENOR45 MENOR46 MENOR47 MENOR48 MENOR49 MENOR50 MENOR51 MENOR52 MENOR53 MENOR54 MENOR55 MENOR56 MENOR57 MENOR58 MENOR59 MENOR60 MENOR61 MENOR62 MENOR63 MENOR64 MENOR65 MENOR66 MENOR67 MENOR68 MENOR69 MENOR70 MENOR71 MENOR72 MENOR73 MENOR74 MENOR75 MENOR76 MENOR77 MENOR78 MENOR79 MENOR80 MENOR81 MENOR82 MENOR83 MENOR84 MENOR85 MENOR86 MENOR87 MENOR88 MENOR89 MENOR90 MENOR91 MENOR92 MENOR93 MENOR94 MENOR95 MENOR96 MENOR97 MENOR98 MENOR99 MENOR100 MENOR101 MENOR102 MENOR103 MENOR104 MENOR105 MENOR106 MENOR107 MENOR108 MENOR109 MENOR110 MENOR111 MENOR112 MENOR113 MENOR114 MENOR115 MENOR116 MENOR117 MENOR118 MENOR119 MENOR120 MENOR121 MENOR122 MENOR123 MENOR124 MENOR125 MENOR126 MENOR127 MENOR128 MENOR129 MENOR130 MENOR131 MENOR132 MENOR133 MENOR134 MENOR135 MENOR136 MENOR137 MENOR138 MENOR139 MENOR140 MENOR141 MENOR142 MENOR143 MENOR144 OTMIE1 OTMIE2 OTMIE3 OTMIE4 OTMIE5 OTMIE6 OTMIE7 OTMIE8 OTMIE9 OTMIE10 OTMIE11 OTMIE12 OTMIE13 OTMIE14 OTMIE15 OTMIE16 OTMIE17 OTMIE18 OTMIE19 OTMIE20 OTMIE21 OTMIE22 OTMIE23 OTMIE24 OTMIE25 OTMIE26 OTMIE27 OTMIE28 OTMIE29 OTMIE30 OTMIE31 OTMIE32 OTMIE33 OTMIE34 OTMIE35 OTMIE36 OTMIE37 OTMIE38 OTMIE39 OTMIE40 OTMIE41 OTMIE42 OTMIE43 OTMIE44 OTMIE45 OTMIE46 OTMIE47 OTMIE48 OTMIE49 OTMIE50 OTMIE51 OTMIE52 OTMIE53 OTMIE54 OTMIE55 OTMIE56 OTMIE57 OTMIE58 OTMIE59 OTMIE60 OTMIE61 OTMIE62 OTMIE63 OTMIE64 OTMIE65 OTMIE66 OTMIE67 OTMIE68 OTMIE69 OTMIE70 OTMIE71 OTMIE72 OTMIE73 OTMIE74 OTMIE75 OTMIE76 OTMIE77 OTMIE78 OTMIE79 OTMIE80 OTMIE81 OTMIE82 OTMIE83 OTMIE84 OTMIE85 OTMIE86 OTMIE87 OTMIE88 OTMIE89 OTMIE90 OTMIE91 OTMIE92 OTMIE93 OTMIE94 OTMIE95 OTMIE96 OTMIE97 OTMIE98 OTMIE99 OTMIE100 OTMIE101 OTMIE102 OTMIE103 OTMIE104 OTMIE105 OTMIE106 OTMIE107 OTMIE108 OTMIE109 OTMIE110 OTMIE111 OTMIE112 OTMIE113 OTMIE114 OTMIE115 OTMIE116 OTMIE117 OTMIE118 OTMIE119 OTMIE120 OTMIE121 OTMIE122 OTMIE123 OTMIE124 OTMIE125 OTMIE126 OTMIE127 OTMIE128 OTMIE129 OTMIE130 OTMIE131 OTMIE132 OTMIE133 OTMIE134 OTMIE135 OTMIE136 OTMIE137 OTMIE138 OTMIE139 OTMIE140 OTMIE141 OTMIE142 OTMIE143 OTMIE144 OTROS1 OTROS2 OTROS3 OTROS4 OTROS5 OTROS6 OTROS7 OTROS8 OTROS9 OTROS10 OTROS11 OTROS12 OTROS13 OTROS14 OTROS15 OTROS16 OTROS17 OTROS18 OTROS19 OTROS20 OTROS21 OTROS22 OTROS23 OTROS24 OTROS25 OTROS26 OTROS27 OTROS28 OTROS29 OTROS30 OTROS31 OTROS32 OTROS33 OTROS34 OTROS35 OTROS36 OTROS37 OTROS38 OTROS39 OTROS40 OTROS41 OTROS42 OTROS43 OTROS44 OTROS45 OTROS46 OTROS47 OTROS48 OTROS49 OTROS50 OTROS51 OTROS52 OTROS53 OTROS54 OTROS55 OTROS56 OTROS57 OTROS58 OTROS59 OTROS60 OTROS61 OTROS62 OTROS63 OTROS64 OTROS65 OTROS66 OTROS67 OTROS68 OTROS69 OTROS70 OTROS71 OTROS72 OTROS73 OTROS74 OTROS75 OTROS76 OTROS77 OTROS78 OTROS79 OTROS80 OTROS81 OTROS82 OTROS83 OTROS84 OTROS85 OTROS86 OTROS87 OTROS88 OTROS89 OTROS90 OTROS91 OTROS92 OTROS93 OTROS94 OTROS95 OTROS96 OTROS97 OTROS98 OTROS99 OTROS100 OTROS101 OTROS102 OTROS103 OTROS104 OTROS105 OTROS106 OTROS107 OTROS108 OTROS109 OTROS110 OTROS111 OTROS112 OTROS113 OTROS114 OTROS115 OTROS116 OTROS117 OTROS118 OTROS119 OTROS120 OTROS121 OTROS122 OTROS123 OTROS124 OTROS125 OTROS126 OTROS127 OTROS128 OTROS129 OTROS130 OTROS131 OTROS132 OTROS133 OTROS134 OTROS135 OTROS136 OTROS137 OTROS138 OTROS139 OTROS140 OTROS141 OTROS142 OTROS143 OTROS144 INTER1 INTER2 INTER3 INTER4 INTER5 INTER6 INTER7 INTER8 INTER9 INTER10 INTER11 INTER12 INTER13 INTER14 INTER15 INTER16 INTER17 INTER18 INTER19 INTER20 INTER21 INTER22 INTER23 INTER24 INTER25 INTER26 INTER27 INTER28 INTER29 INTER30 INTER31 INTER32 INTER33 INTER34 INTER35 INTER36 INTER37 INTER38 INTER39 INTER40 INTER41 INTER42 INTER43 INTER44 INTER45 INTER46 INTER47 INTER48 INTER49 INTER50 INTER51 INTER52 INTER53 INTER54 INTER55 INTER56 INTER57 INTER58 INTER59 INTER60 INTER61 INTER62 INTER63 INTER64 INTER65 INTER66 INTER67 INTER68 INTER69 INTER70 INTER71 INTER72 INTER73 INTER74 INTER75 INTER76 INTER77 INTER78 INTER79 INTER80 INTER81 INTER82 INTER83 INTER84 INTER85 INTER86 INTER87 INTER88 INTER89 INTER90 INTER91 INTER92 INTER93 INTER94 INTER95 INTER96 INTER97 INTER98 INTER99 INTER100 INTER101 INTER102 INTER103 INTER104 INTER105 INTER106 INTER107 INTER108 INTER109 INTER110 INTER111 INTER112 INTER113 INTER114 INTER115 INTER116 INTER117 INTER118 INTER119 INTER120 INTER121 INTER122 INTER123 INTER124 INTER125 INTER126 INTER127 INTER128 INTER129 INTER130 INTER131 INTER132 INTER133 INTER134 INTER135 INTER136 INTER137 INTER138 INTER139 INTER140 INTER141 INTER142 INTER143 INTER144 LUGAR1 LUGAR2 LUGAR3 LUGAR4 LUGAR5 LUGAR6 LUGAR7 LUGAR8 LUGAR9 LUGAR10 LUGAR11 LUGAR12 LUGAR13 LUGAR14 LUGAR15 LUGAR16 LUGAR17 LUGAR18 LUGAR19 LUGAR20 LUGAR21 LUGAR22 LUGAR23 LUGAR24 LUGAR25 LUGAR26 LUGAR27 LUGAR28 LUGAR29 LUGAR30 LUGAR31 LUGAR32 LUGAR33 LUGAR34 LUGAR35 LUGAR36 LUGAR37 LUGAR38 LUGAR39 LUGAR40 LUGAR41 LUGAR42 LUGAR43 LUGAR44 LUGAR45 LUGAR46 LUGAR47 LUGAR48 LUGAR49 LUGAR50 LUGAR51 LUGAR52 LUGAR53 LUGAR54 LUGAR55 LUGAR56 LUGAR57 LUGAR58 LUGAR59 LUGAR60 LUGAR61 LUGAR62 LUGAR63 LUGAR64 LUGAR65 LUGAR66 LUGAR67 LUGAR68 LUGAR69 LUGAR70 LUGAR71 LUGAR72 LUGAR73 LUGAR74 LUGAR75 LUGAR76 LUGAR77 LUGAR78 LUGAR79 LUGAR80 LUGAR81 LUGAR82 LUGAR83 LUGAR84 LUGAR85 LUGAR86 LUGAR87 LUGAR88 LUGAR89 LUGAR90 LUGAR91 LUGAR92 LUGAR93 LUGAR94 LUGAR95 LUGAR96 LUGAR97 LUGAR98 LUGAR99 LUGAR100 LUGAR101 LUGAR102 LUGAR103 LUGAR104 LUGAR105 LUGAR106 LUGAR107 LUGAR108 LUGAR109 LUGAR110 LUGAR111 LUGAR112 LUGAR113 LUGAR114 LUGAR115 LUGAR116 LUGAR117 LUGAR118 LUGAR119 LUGAR120 LUGAR121 LUGAR122 LUGAR123 LUGAR124 LUGAR125 LUGAR126 LUGAR127 LUGAR128 LUGAR129 LUGAR130 LUGAR131 LUGAR132 LUGAR133 LUGAR134 LUGAR135 LUGAR136 LUGAR137 LUGAR138 LUGAR139 LUGAR140 LUGAR141 LUGAR142 LUGAR143 LUGAR144 D1 D2 D3 D4 D5 D6A D6B D7 D7B DAYUDA MUESTRA FACTOR F. get file='C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\mtus data\countries\Spain\2002-03\original-diary.sav'. *change variables to numeric. save outfile='C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\mtus data\countries\Spain\2002-03\original-diary.sav'. rename variables (IDHOGAR NPERS=hldid persid). formats APRIN1 to LUGAR144 (F8.0). recode solo1 to inter144 (sysmis=6). execute. val lab DDIASEM 1 Monday 2 Tuesday 3 Wednesday 4 Thursday 5 Friday 6 Saturday 7 Sunday. val lab solo1 to inter144 1 yes 6 no. val lab APRIN1 to APRIN144 0 Unspecified personal care 1 Imputed personal and household care - CTUR computation 2 Imputed sleep - CTUR computation 3 Imputed time away from home - CTUR computation 100 Unspecified sleep 110 Sleep 120 Sick in bed 200 Unspecified meals and drinks 210 Principal meals and drinks 220 Not principal meals and drinks 221 Appetizer 222 Afternoon snack 229 Other not principal meals and drinks 300 Other Unspecified personal care 310 Dressing and toilet 390 Other specified personal care 1000 Unspecified job 1110 Regular work in main job 1120 Break time and coffee break 1130 Training during the main job 1210 Regular work in second job 1220 Break time and coffee break in second job 1230 Training during second job 1300 Unspecified activities related with main job 1310 Lunch break 1320 Job seeking 1390 Other activities related with main job 2000 Unspecified studies 2100 'Unspecified activities related with University/School' 2110 Class, course and conferences 2120 Homework and library 2190 'Other activities related with University/school' 2210 Free time study 3000 Unspecified activities related with house and family 3100 Unspecified culinary activities 3110 Food preparation 3120 Pastry making 3130 Dish washing 3140 Preserving 3190 Other specified culinary activities 3200 Unspecified house maintenance 3210 Cleaning dwelling 3220 Cleaning yard 3230 Heating and water supplying 3240 Different organization tasks 3290 Other specified house maintenance 3300 Unspecified activities related with caring and dressmaking 3310 Laundry 3320 Ironing 3330 Handcraft and producing textiles 3390 Other specified activities related with caring and dressmaking 3400 Unspecified gardening and animal care activities 3410 Gardening 3420 Domestic animal care 3430 Pet care 3440 Walking dog 3490 Other activities related to gardening and pet care 3500 Unspecified construction and repair activities 3510 Home construction, renewals 3520 Home repairs 3530 Home equipment construction, repairs and maintenance 3540 Vehicles maintenance 3590 Other specified construction and repair activities 3600 Unspecified Shopping and services 3610 Shopping 3620 Commercial and administrative Services 3630 Personal services 3690 Other specified shopping and services 3710 Home managements 3711 Home managements by Internet 3712 Other home managements 3800 Unspecified Childcare 3810 Child physical care and vigilance 3820 Teaching child 3830 Reading, playing talking with child 3840 Accompanying child 3890 Other specified childcare activities 3910 Help to adult members of household 4000 Unspecified volunteering, meetings 4100 Unspecified organizational work 4110 Work for an organization 4120 Volunteer through an organization 4190 Other specified organizational work 4200 Unspecified help to other households 4210 Help in culinary activities 4220 Help in house maintenance 4230 Help in gardening and animal care 4240 Help in construction and repairs 4250 Help in shopping and services 4260 Help in work and agriculture 4270 Help in childcare 4280 Help to adults in other households 4290 Unspecified informal help 4300 Unspecified participatory activities 4310 Meetings 4320 Religious activities 4390 Other specified participatory activity 5000 Unspecified social and fun activities 5100 Unspecified social relations 5110 Family social life 5120 Visiting and receiving visits 5130 Parties 5140 Phone conversations 5190 Other specified social relations 5200 Unspecified cultural and fun acts 5210 Cinema 5220 Unspecified concerts and theatre 5221 Theatre 5222 Classic music concerts, opera, ballet 5223 Modern music, other music concerts 5230 Art expositions and museums 5240 Library 5250 Sports events 5290 Other specified fun, cultural activities 5300 General passive leisure 5310 Passive leisure 6000 Unspecified sport, outdoor activities 6100 Unspecified physical sport 6110 Walking 6120 Running 6130 Cycling, skiing or skating 6140 Ball games 6150 Gymnastics 6160 Fitness and bodybuilding 6170 Aquatic games 6190 Other specified physic exercises 6200 Unspecified productive exercise 6210 Hunting and fishing 6220 Picking mushrooms, etc 6290 Other specified productive exercise 6310 Activities related to Sports 7000 Unspecified games and hobbies 7100 Unspecified art hobbies 7110 Visual arts 7111 Plastic arts 7112 Photography 7113 Cine 7114 Other visual arts 7120 Unspecified performing arts 7121 Musical hobbies 7122 Theatre 7123 Other performing arts 7130 Literary arts 7190 Other specified artistic hobbies 7200 Unspecified hobbies 7210 Collecting 7220 Computing-programming 7230 Information search 7240 Unspecified computer 7241 Electronic mail 7242 Chatting by Internet 7243 Other communication with computer 7250 Other computing hobbies 7260 Correspondence 7270 Mobile phone information 7280 Unspecified mobile phone 7281 Messages with mobile phone 7282 Other communication, mobile phone 7290 Other specified hobbies 7300 Unspecified games 7310 Alone games 7320 Society games 7330 Computing games 7340 Gambling 7390 Other specified games 8000 Unspecified mass media 8100 Unspecified reading 8110 Unspecified reading press 8111 Reading newspapers 8112 Reading magazines 8113 Reading press by internet 8120 Reading books 8190 Other specified readings 8200 Watch unspecified television, video 8210 Watching television 8220 Watching video 8300 Listening to unspecified radio, music 8310 Listening to radio 8320 Listening records, tapes, etc 9000 Travel with Unspecified purpose 9010 Travel related with personal care 9110 Travel related to main job 9120 Travel related with second job 9130 'Travel to/from work' 9210 'Travel to /from school/University' 9220 Travel during free time for studies 9310 Travel related with house activities 9360 Travel for shopping & services 9380 Travel related with childcare 9390 Travel related with adult care 9410 Travel related to organizational work 9420 Travel for informal help to others 9430 Travel for participatory activities 9510 Travel related to social activities 9520 Travel for cultural and fun activities 9610 Travel for sport or cultural outdoor activities 9710 Travel related to hobbies 9810 Travel related to location changes 9820 Driving for pleasure 9900 Unspecified activity 9950 Fill in Time Use Survey 9960 Activities related to other surveys 9980 Unspecified use of time 9990 Other specified free time. recode LUGAR1 to LUGAR144 (sysmis=0). execute. val lab LUGAR1 to LUGAR144 10 not specified 11 Workplace and home when they are the same 12 Own home 13 Second dwelling 14 Workplace or school outside of home 15 Other’s home 16 Restaurant, cafe, bar 19 Other specified places 20 Unspecified private mode of transport 21 Travel on foot 22 Travel by bicycle, hand powered boat 23 Travel by motorcycle, motor boat 24 Travel by car 25 Travel by truck, van, tractor 26 Other unspecified private transport 30 Unspecified public transport 31 Travel by taxi 32 Travel by bus, 33 Travel by tram, metro 34 Travel by train 35 Travel by aircraft 36 Travel by ship 39 Other unspecified public transport 40 Unspecified mode of transport 51 Swimming pool, beach 52 Country, outdoors, sports centre 53 Commercial centres, supermarkets 54 Street. *correct errors in missing location. do if hldid=3926 and persid=2. do repeat a=lugar1 to lugar17. compute a=12. end repeat. end if. do if hldid=509 and persid=2. do repeat a=lugar1 to lugar144. compute a=12. end repeat. end if. do if hldid=15147 and persid=5. do repeat a=lugar1 to lugar9. compute a=12. end repeat. end if. do if hldid=112 and persid=3. do repeat a=lugar2 to lugar14. compute a=12. end repeat. end if. do if hldid=2491 and persid=1. do repeat a=lugar2 to lugar21. compute a=12. end repeat. end if. do if hldid=2858 and persid=2. do repeat a=lugar1 to lugar83. compute a=12. end repeat. end if. do if hldid=4131 and persid=2. do repeat a=lugar2 to lugar24. compute a=12. end repeat. end if. do if hldid=6641 and persid=4. do repeat a=lugar1 to lugar44. compute a=12. end repeat. end if. do if hldid=7549 and persid=1. do repeat a=lugar1 to lugar72. compute a=12. end repeat. end if. if hldid=9667 and persid=5 and lugar17=2 lugar17=12. do if hldid=2022 and persid=1. do repeat a=lugar38 to lugar143. compute a=12. end repeat. end if. do if hldid=606 and persid=1. do repeat a=lugar41 to lugar46. compute a=12. end repeat. end if. do if hldid=1109 and persid=3. do repeat a=lugar50 to lugar58. compute a=12. end repeat. end if. do if hldid=12156 and persid=1. do repeat a=lugar53 to lugar60. compute a=12. end repeat. end if. do if hldid=2501 and persid=1. do repeat a=lugar56 to lugar66. compute a=12. end repeat. end if. do if hldid=2380 and persid=1. do repeat a=lugar57 to lugar66. compute a=12. end repeat. end if. do if hldid=6877 and persid=1. do repeat a=lugar57 to lugar73. compute a=12. end repeat. end if. do if hldid=19027 and persid=1. do repeat a=lugar67 to lugar143. compute a=12. end repeat. end if. do if hldid=2343 and persid=1. do repeat a=lugar74 to lugar143. compute a=12. end repeat. end if. do if hldid=4770 and persid=2. do repeat a=lugar74 to lugar87. compute a=12. end repeat. end if. do if hldid=1655 and persid=4. do repeat a=lugar77 to lugar81. compute a=12. end repeat. end if. do if hldid=606 and persid=2. do repeat a=lugar85 to lugar143. compute a=12. end repeat. end if. do if hldid=6869 and persid=1. do repeat a=lugar85 to lugar93. compute a=12. end repeat. end if. do if hldid=12615 and persid=2. do repeat a=lugar87 to lugar143. compute a=12. end repeat. end if. do if hldid=6866 and persid=1. do repeat a=lugar102 to lugar143. compute a=12. end repeat. end if. do if hldid=4812 and persid=2. do repeat a=lugar109 to lugar143. compute a=12. end repeat. end if. execute. *lugar1 to 144 checked for odd values, activity sequence checked, corrected. freq lugar144. do if hldid=12635 and persid=2. do repeat a=APRIN1 to APRIN7. compute a=2. end repeat. end if. do if hldid=9976 and persid=1. do repeat a=APRIN11 to APRIN13. compute a=1. end repeat. do repeat a=APRIN21 to APRIN23. compute a=1. end repeat. end if. do if hldid=13007 and persid=1. do repeat a=APRIN12 to APRIN17. compute a=1. end repeat. end if. if hldid=6524 and persid=1 APRIN13=1. do if hldid=6584 and persid=1. do repeat a=APRIN14 to APRIN16. compute a=1. end repeat. do repeat a=APRIN40 to APRIN42. compute a=1. end repeat. end if. do if hldid=14027 and persid=1. do repeat a=APRIN14 to APRIN16. compute a=1. end repeat. end if. do if hldid=6610 and persid=2. do repeat a=APRIN15 to APRIN18. compute a=1. end repeat. end if. do if hldid=2898 and persid=1. do repeat a=APRIN16 to APRIN47 /b=lugar16 to lugar47. if a=9980 and b=54 a=3. end repeat. end if. execute. val lab ASECU1 to ASECU144 0 no secondary activity 1 eat or drink 2 personal care 3 paid work 4 meal breaks 5 study and homework 6 other housework 7 laundry, repair clothing, ironing 8 animal or plant care 9 child or adult care 10 formal and informal volunteering 11 participatory, cultural and social 12 passive leisure, sports, games, hobbies, outside activity 13 reading 14 watch TV or video 15 listen to music or radio 16 other secondary activity. vector APRIN=APRIN1 to APRIN144 / asecu=asecu1 to asecu144. loop i=1 to 144. Do if (APRIN(i)=9980 or APRIN(i)=9900) and asecu(i)=14. compute APRIN(i)=8210. compute asecu(i)=0. end if. Do if (APRIN(i)=9980 or APRIN(i)=9900) and asecu(i)=2. compute APRIN(i)=300. compute asecu(i)=0. end if. Do if (APRIN(i)=9980 or APRIN(i)=9900) and asecu(i)=11. compute APRIN(i)=5000. compute asecu(i)=0. end if. Do if (APRIN(i)=9980 or APRIN(i)=9900) and asecu(i)=12. compute APRIN(i)=5200. compute asecu(i)=0. end if. Do if (APRIN(i)=9980 or APRIN(i)=9900) and asecu(i)=15. compute APRIN(i)=8300. compute asecu(i)=0. end if. Do if (APRIN(i)=9980 or APRIN(i)=9900 or APRIN(i)=1) and asecu(i)=6. compute APRIN(i)=3000. compute asecu(i)=0. end if. end loop. execute. vector APRIN=APRIN1 to APRIN144 / lugar=lugar1 to lugar144. loop i=1 to 144. if (APRIN(i)=9980 or APRIN(i)=9900) and (lugar(i)=19 or lugar(i)=52 or lugar(i)=54) APRIN(i)=3. if (APRIN(i)=9980 or APRIN(i)=9900) and (lugar(i)>19 and lugar(i)<41) APRIN(i)=9810. end loop. execute. vector APRIN=APRIN1 to APRIN144 / lugar=lugar1 to lugar144 /otros=otros1 to otros144. loop i=1 to 144. Do if (APRIN(i)=9980 or APRIN(i)=9900) and lugar(i)=15 and otros(i)=1. compute APRIN(i)=5100. Else if (APRIN(i)=9980 or APRIN(i)=9900) and lugar(i)=15. compute APRIN(i)=3. End if. end loop. execute. vector APRIN=APRIN1 to APRIN144 / inter=inter1 to inter144. loop i=1 to 144. if (APRIN(i)=9980 or APRIN(i)=9900) and inter(i)=1 APRIN(i)=7250. end loop. execute. do if hldid=6144 and persid=2. compute APRIN19=1. compute APRIN20=1. compute APRIN28=1. compute APRIN29=1. end if. do if hldid=16928 and persid=4. compute APRIN20=1. compute APRIN21=1. compute APRIN47=1. compute APRIN48=1. end if. do if hldid=2077 and persid=1. compute APRIN21=1. compute APRIN25=1. compute APRIN26=1. end if. do if hldid=4029 and persid=3. compute APRIN22=9610. compute APRIN23=9610. compute APRIN24=9610. compute APRIN52=9810. compute APRIN53=9810. compute APRIN54=9810. compute lugar22=40. compute lugar23=40. compute lugar24=40. compute lugar52=40. compute lugar53=40. compute lugar54=40. end if. do if hldid=10830 and persid=2. compute APRIN23=1. compute APRIN42=1. end if. do if hldid=13376 and persid=1. compute APRIN24=1. compute APRIN42=1. end if. do if hldid=19831 and persid=1. compute APRIN25=1. compute APRIN26=1. compute APRIN35=1. compute APRIN43=1. compute APRIN45=1. compute APRIN46=1. else if hldid=19831 and persid=2. compute APRIN24=1. compute APRIN25=1. compute APRIN26=1. compute APRIN45=1. compute APRIN46=1. end if. do if hldid=9105 and persid=3. compute APRIN25=1. compute APRIN26=1. compute APRIN36=1. end if. do if hldid=14151 and persid=1. compute APRIN26=1. compute APRIN27=1. compute APRIN32=1. compute APRIN33=1. compute APRIN34=1. end if. do if hldid=10550 and persid=2. compute APRIN27=1. compute APRIN33=1. compute APRIN34=1. end if. do if hldid=11774 and persid=1. compute APRIN28=1. compute APRIN29=1. compute APRIN44=1. compute APRIN45=1. else if hldid=11774 and persid=2. compute APRIN28=1. compute APRIN29=1. compute APRIN47=1. compute APRIN48=1. end if. do if hldid=10966 and persid=2. compute APRIN30=1. compute APRIN34=1. end if. do if hldid=19791 and persid=1. compute APRIN33=1. compute APRIN38=1. compute APRIN39=1. end if. do if hldid=10633. compute APRIN34=1. compute APRIN40=1. compute APRIN41=1. end if. do if hldid=9345 and persid=3. compute APRIN35=1. compute APRIN54=1. end if. do if hldid=10761 and persid=3. compute APRIN36=1. compute APRIN45=1. compute APRIN46=1. end if. do if hldid=15095 and persid=2. compute APRIN37=1. compute APRIN38=1. compute APRIN39=1. end if. do if hldid=15631 and persid=1. compute APRIN37=1. compute APRIN42=1. end if. do if hldid=19944 and persid=1. compute APRIN37=1. compute APRIN43=1. end if. do if hldid=9105 and persid=1. compute APRIN37=1. compute APRIN54=1. end if. do if hldid=6774 and persid=3. compute APRIN38=1. compute APRIN39=1. end if. do if hldid=2077 and persid=1. compute APRIN41=1. compute APRIN48=1. end if. do if hldid=13544 and persid=2. compute APRIN42=1. compute APRIN46=1. end if. do if hldid=2672 and persid=4. compute APRIN42=1. compute APRIN43=1. compute APRIN47=1. end if. do if hldid=18504 and persid=1. compute APRIN43=1. compute APRIN44=1. compute APRIN45=1. end if. do if hldid=10966 and persid=3. compute APRIN43=1. compute APRIN44=1. compute APRIN47=1. end if. do if hldid=17646 and persid=1. compute APRIN46=1. compute APRIN47=1. compute APRIN48=1. end if. do if hldid=10966 and persid=2. compute APRIN46=1. compute APRIN47=1. compute APRIN48=1. compute APRIN49=1. end if. do if hldid=14371 and persid=1. compute APRIN49=1. compute APRIN54=1. end if. do if hldid=10170 and persid=2. compute APRIN50=1. end if. do if hldid=10966 and persid=3. compute APRIN51=1. compute APRIN52=1. end if. do if hldid=19831 and persid=1. compute APRIN51=1. compute APRIN52=1. end if. do if hldid=16928 and persid=4. compute APRIN52=1. end if. Do if hldid=1071 and persid=3. do repeat a=aprin53 to aprin93 / b=lugar53 to lugar93. if a=9980 and b=14 a=2100. end repeat. End if. do if hldid=2795 and persid=2. compute APRIN55=1. end if. do if hldid=4919 and persid=4. compute APRIN55=1. end if. do if hldid=9105 and persid=3. compute APRIN55=1. end if. do if hldid=10823 and persid=1. compute APRIN55=1. compute APRIN56=1. end if. do if hldid=10823 and persid=2. compute APRIN56=1. end if. do if hldid=2843 and persid=1. compute APRIN57=1. compute APRIN58=1. compute APRIN67=1. compute APRIN68=1. end if. do if hldid=9105 and persid=2. compute APRIN58=1. compute APRIN90=1. end if. do if hldid=19831 and persid=1. compute APRIN60=1. compute APRIN61=1. compute APRIN62=1. compute APRIN71=1. compute APRIN72=1. end if. do if hldid=6156 and persid=1. compute APRIN61=1. compute APRIN65=1. compute APRIN66=1. end if. do if hldid=6554 and persid=2. compute APRIN61=1. compute APRIN62=1. compute APRIN63=1. end if. do if hldid=9105 and persid=1. compute APRIN61=1. end if. do if hldid=9105 and persid=4. compute APRIN61=1. compute APRIN84=1. end if. do if hldid=12088 and persid=1. compute APRIN64=1. compute APRIN71=1. compute APRIN72=1. end if. do if hldid=8283 and persid=1. compute APRIN70=1. compute APRIN71=1. compute APRIN72=1. compute APRIN73=1. compute APRIN74=1. compute APRIN75=1. end if. do if hldid=12055 and persid=1. compute APRIN72=1. compute APRIN73=1. compute APRIN82=1. compute APRIN83=1. end if. do if hldid=12099 and persid=1. compute APRIN72=1. compute APRIN73=1. compute APRIN90=1. end if. do if hldid=4325 and persid=1. compute APRIN73=1. compute APRIN74=1. compute APRIN84=1. end if. do if hldid=14945 and persid=2. compute APRIN73=1. compute APRIN74=1. compute APRIN82=1. compute APRIN83=1. end if. if hldid=10414 and persid=2 and APRIN75=9980 APRIN75=1. do if hldid=13565 and persid=5. compute APRIN76=1. compute APRIN90=1. end if. do if hldid=11613 and persid=2. compute APRIN77=1. compute APRIN78=1. compute APRIN82=1. end if. do if hldid=15993 and persid=3. compute APRIN77=9810. compute APRIN78=9810. compute LUGAR77=40. compute LUGAR78=40. end if. do if hldid=10966 and persid=1. compute APRIN78=1. compute APRIN79=1. else if hldid=10966 and persid=2. compute APRIN78=1. compute APRIN79=1. compute APRIN80=1. end if. do if hldid=6167 and persid=2. compute APRIN79=1. compute APRIN80=1. compute APRIN81=1. end if. do if hldid=15656 and persid=3. compute APRIN79=9810. compute APRIN80=9810. compute APRIN81=9810. compute LUGAR79=40. compute LUGAR80=40. compute LUGAR81=40. end if. Do if hldid=13091 and persid=3. do repeat a=aprin79 to aprin83. compute a=1300. end repeat. End if. do if hldid=13544 and persid=2. compute APRIN80=1. compute APRIN86=1. end if. do if hldid=15608 and persid=2. compute APRIN80=1. compute APRIN81=1. compute APRIN89=1. end if. do if hldid=6774 and persid=3. compute APRIN80=1. compute APRIN81=1. end if. do if hldid=15090 and persid=3. compute APRIN82=1. compute APRIN83=1. compute APRIN84=1. end if. do if hldid=19831 and persid=1. compute APRIN82=1. compute APRIN83=1. compute APRIN84=1. end if. if hldid=16573 and persid=1 APRIN90=1. do if hldid=1702 and persid=3. compute APRIN86=1. compute APRIN87=1. end if. if hldid=6584 and persid=2 APRIN84=1. do if hldid=9105 and persid=3. compute APRIN83=1. compute APRIN84=1. end if. if hldid=9256 and persid=1 APRIN93=1. Do if hldid=9560 and persid=2. do repeat a=aprin84 to aprin87. compute a=1. end repeat. End if. do if hldid=11224 and persid=2. compute APRIN84=1. compute APRIN85=1. compute APRIN89=1. end if. if hldid=11351 and persid=1 APRIN89=1. do if hldid=12185 and persid=2. compute APRIN84=1. compute APRIN87=1. compute APRIN88=1. end if. do if hldid=15089 and persid=1. compute APRIN85=3. compute APRIN86=3. compute APRIN87=3. compute APRIN88=3. compute APRIN89=3. compute APRIN90=9810. compute LUGAR90=40. end if. if hldid=19831 and persid=2 APRIN85=1. if hldid=2694 and persid=4 APRIN85=1. do if hldid=6554 and persid=1. compute APRIN85=1. compute APRIN86=1. compute APRIN87=1. end if. do if hldid=11618 and persid=1. compute APRIN85=1. compute APRIN86=1. compute APRIN90=1. end if. do if hldid=11657 and persid=2. compute APRIN85=1. end if. do if hldid=11722 and persid=2. compute APRIN85=1. compute APRIN86=1. compute APRIN90=1. end if. if hldid=16803 and persid=1 APRIN90=1. if hldid=993 and persid=1 APRIN90=1. do if hldid=10550 and persid=9. compute APRIN86=1. compute APRIN87=1. compute APRIN91=1. end if. if hldid=19772 and persid=2 APRIN90=1. do if hldid=10237 and persid=2. compute APRIN89=1. compute APRIN90=1. end if. if hldid=10170 and persid=2 APRIN92=1. if hldid=10987 and persid=1 APRIN90=1. do if hldid=16089 and persid=1. compute APRIN91=9810. compute APRIN92=1. compute APRIN93=1. compute LUGAR91=40. end if. if hldid=19829 and persid=2 APRIN92=1. if hldid=5010 and persid=3 APRIN96=1. if hldid=9327 and persid=1 APRIN93=1. if hldid=12114 and persid=2 APRIN94=1. if hldid=2694 and persid=4 APRIN96=1. if hldid=18112 and persid=1 APRIN96=1. if hldid=4005 and persid=1 APRIN97=1. if hldid=15872 and persid=1 APRIN97=1. if hldid=10823 and persid=1 APRIN98=1. if hldid=14371 and persid=2 APRIN98=1. do if hldid=13457 and persid=1. compute APRIN103=9810. compute LUGAR103=40. end if. if hldid=9256 and persid=1 APRIN93=1. Do if hldid=6801 and persid=3. do repeat a=aprin102 to aprin107. compute a=1. end repeat. End if. Do if hldid=5010 and persid=3. compute aprin103=1. compute aprin104=1. do repeat a=aprin105 to aprin144. compute a=2. end repeat. do repeat a=lugar103 to lugar144. compute a=12. end repeat. End if. do if hldid=4005 and persid=1. compute APRIN105=1. compute APRIN106=1. end if. Do if hldid=9105 and persid=2. compute aprin119=1. compute aprin120=1. do repeat a=aprin104 to aprin118. compute a=8210. end repeat. End if. if hldid=13709 and persid=2 APRIN105=1. execute. temp. select if aprin144>9899 or aprin144<10. cro APRIN144 by asecu144 lugar144. sort cases by hldid persid. *change format to long file where each row is a time slot. vector aprin = APRIN1 to APRIN144 /asecu = ASECU1 to ASECU144 /solo = SOLO1 to SOLO144 /menor = MENOR1 to MENOR144 /otmie = OTMIE1 to OTMIE144 /otros = OTROS1 to OTROS144 /inter = INTER1 to INTER144 /lugar = LUGAR1 to LUGAR144. loop i=1 to 144. compute ddiasem=MAX(DDIASEM). compute slottm=10. compute slot=i. compute principal=aprin(i). compute segunda=asecu(i). compute ict=inter(i). compute alone=solo(i). compute child=menor(i). compute otmie=otmie(i). compute oad=otros(i). compute lugar=lugar(i). xsave outfile='C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\mtus data\countries\Spain\2002-03\hef.sav' /keep = hldid persid ddiasem slottm slot principal segunda ict lugar alone child otmie oad. end loop. execute. get file='C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\mtus data\countries\Spain\2002-03\hef.sav'. recode alone child ict (1=1) (else=0). freq alone. val lab segunda 0 no secondary activity 1 eat or drink 2 personal care 3 paid work 4 meal breaks 5 study and homework 6 other housework 7 laundry, repair clothing, ironing 8 animal or plant care 9 child or adult care 10 formal and informal volunteering 11 participatory, cultural and social 12 passive leisure, sports, games, hobbies, outside activity 13 reading 14 watch TV or video 15 listen to music or radio 16 other secondary activity. val lab principal 0 Unspecified personal care 1 Imputed personal and household care - CTUR computation 2 Imputed sleep - CTUR computation 3 Imputed time away from home - CTUR computation 100 Unspecified sleep 110 Sleep 120 Sick in bed 200 Unspecified meals and drinks 210 Principal meals and drinks 220 Not principal meals and drinks 221 Appetizer 222 Afternoon snack 229 Other not principal meals and drinks 300 Other Unspecified personal care 310 Dressing and toilet 390 Other specified personal care 1000 Unspecified job 1110 Regular work in main job 1120 Break time and coffee break 1130 Training during the main job 1210 Regular work in second job 1220 Break time and coffee break in second job 1230 Training during second job 1300 Unspecified activities related with main job 1310 Lunch break 1320 Job seeking 1390 Other activities related with main job 2000 Unspecified studies 2100 'Unspecified activities related with University/School' 2110 Class, course and conferences 2120 Homework and library 2190 'Other activities related with University/school' 2210 Free time study 3000 Unspecified activities related with house and family 3100 Unspecified culinary activities 3110 Food preparation 3120 Pastry making 3130 Dish washing 3140 Preserving 3190 Other specified culinary activities 3200 Unspecified house maintenance 3210 Cleaning dwelling 3220 Cleaning yard 3230 Heating and water supplying 3240 Different organization tasks 3290 Other specified house maintenance 3300 Unspecified activities related with caring and dressmaking 3310 Laundry 3320 Ironing 3330 Handcraft and producing textiles 3390 Other specified activities related with caring and dressmaking 3400 Unspecified gardening and animal care activities 3410 Gardening 3420 Domestic animal care 3430 Pet care 3440 Walking dog 3490 Other activities related to gardening and pet care 3500 Unspecified construction and repair activities 3510 Home construction, renewals 3520 Home repairs 3530 Home equipment construction, repairs and maintenance 3540 Vehicles maintenance 3590 Other specified construction and repair activities 3600 Unspecified Shopping and services 3610 Shopping 3620 Commercial and administrative Services 3630 Personal services 3690 Other specified shopping and services 3710 Home managements 3711 Home managements by Internet 3712 Other home managements 3800 Unspecified Childcare 3810 Child physical care and vigilance 3820 Teaching child 3830 Reading, playing talking with child 3840 Accompanying child 3890 Other specified childcare activities 3910 Help to adult members of household 4000 Unspecified volunteering, meetings 4100 Unspecified organizational work 4110 Work for an organization 4120 Volunteer through an organization 4190 Other specified organizational work 4200 Unspecified help to other households 4210 Help in culinary activities 4220 Help in house maintenance 4230 Help in gardening and animal care 4240 Help in construction and repairs 4250 Help in shopping and services 4260 Help in work and agriculture 4270 Help in childcare 4280 Help to adults in other households 4290 Unspecified informal help 4300 Unspecified participatory activities 4310 Meetings 4320 Religious activities 4390 Other specified participatory activity 5000 Unspecified social and fun activities 5100 Unspecified social relations 5110 Family social life 5120 Visiting and receiving visits 5130 Parties 5140 Phone conversations 5190 Other specified social relations 5200 Unspecified cultural and fun acts 5210 Cinema 5220 Unspecified concerts and theatre 5221 Theatre 5222 Classic music concerts, opera, ballet 5223 Modern music, other music concerts 5230 Art expositions and museums 5240 Library 5250 Sports events 5290 Other specified fun, cultural activities 5300 General passive leisure 5310 Passive leisure 6000 Unspecified sport, outdoor activities 6100 Unspecified physical sport 6110 Walking 6120 Running 6130 Cycling, skiing or skating 6140 Ball games 6150 Gymnastics 6160 Fitness and bodybuilding 6170 Aquatic games 6190 Other specified physic exercises 6200 Unspecified productive exercise 6210 Hunting and fishing 6220 Picking mushrooms, etc 6290 Other specified productive exercise 6310 Activities related to Sports 7000 Unspecified games and hobbies 7100 Unspecified art hobbies 7110 Visual arts 7111 Plastic arts 7112 Photography 7113 Cine 7114 Other visual arts 7120 Unspecified performing arts 7121 Musical hobbies 7122 Theatre 7123 Other performing arts 7130 Literary arts 7190 Other specified artistic hobbies 7200 Unspecified hobbies 7210 Collecting 7220 Computing-programming 7230 Information search 7240 Unspecified computer 7241 Electronic mail 7242 Chatting by Internet 7243 Other communication with computer 7250 Other computing hobbies 7260 Correspondence 7270 Mobile phone information 7280 Unspecified mobile phone 7281 Messages with mobile phone 7282 Other communication, mobile phone 7290 Other specified hobbies 7300 Unspecified games 7310 Alone games 7320 Society games 7330 Computing games 7340 Gambling 7390 Other specified games 8000 Unspecified mass media 8100 Unspecified reading 8110 Unspecified reading press 8111 Reading newspapers 8112 Reading magazines 8113 Reading press by internet 8120 Reading books 8190 Other specified readings 8200 Watch unspecified television, video 8210 Watching television 8220 Watching video 8300 Listening to unspecified radio, music 8310 Listening to radio 8320 Listening records, tapes, etc 9000 Travel with Unspecified purpose 9010 Travel related with personal care 9110 Travel related to main job 9120 Travel related with second job 9130 'Travel to/from work' 9210 'Travel to /from school/University' 9220 Travel during free time for studies 9310 Travel related with house activities 9360 Travel for shopping & services 9380 Travel related with childcare 9390 Travel related with adult care 9410 Travel related to organizational work 9420 Travel for informal help to others 9430 Travel for participatory activities 9510 Travel related to social activities 9520 Travel for cultural and fun activities 9610 Travel for sport or cultural outdoor activities 9710 Travel related to hobbies 9810 Travel related to location changes 9820 Driving for pleasure 9900 Unspecified activity 9950 Fill in Time Use Survey 9960 Activities related to other surveys 9980 Unspecified use of time 9990 Other specified free time. val lab lugar 10 not specified 11 Workplace and home when they are the same 12 Own home 13 Second dwelling 14 Workplace or school outside of home 15 Other’s home 16 Restaurant, cafe, bar 19 Other specified places 20 Unspecified private mode of transport 21 Travel on foot 22 Travel by bicycle, hand powered boat 23 Travel by motorcycle, motor boat 24 Travel by car 25 Travel by truck, van, tractor 26 Other unspecified private transport 30 Unspecified public transport 31 Travel by taxi 32 Travel by bus, 33 Travel by tram, metro 34 Travel by train 35 Travel by aircraft 36 Travel by ship 39 Other unspecified public transport 40 Unspecified mode of transport 51 Swimming pool, beach 52 Country, outdoors, sports centre 53 Commercial centres, supermarkets 54 Street. *set up MTUS harmonised variables. compute animal=0. if principal=3420 or principal=3430 or principal=3440 or principal=4230 animal=1. freq animal. cro principal by animal. aggregate outfile=* mode=addvariables /break hldid persid /anypet=MAX(animal). cro segunda by anypet by animal. *secondary activity categories combine pet, domestic animal and plant care. *41% of the cases where someone reports this secondary activity and the *main activity is not time with an animal is on a day where the person *spent time with an animal - add these cases to animal time. if segunda=8 and anypet=1 animal=1. cro segunda by animal. cro principal by ict. If principal=3711 or principal=7270 or principal=7330 or principal=8113 or (principal>7219 and principal<7251) and ict=0 ict=1. cro principal by ict. compute start= slot*10-10. compute end=slot*10. freq start end. compute clockst=6. if slot=2 clockst=6.1. if slot=3 clockst=6.2. if slot=4 clockst=6.3. if slot=5 clockst=6.4. if slot=6 clockst=6.5. if slot=7 clockst=7. if slot=8 clockst=7.1. if slot=9 clockst=7.2. if slot=10 clockst=7.3. if slot=11 clockst=7.4. if slot=12 clockst=7.5. if slot=13 clockst=8. if slot=14 clockst=8.1. if slot=15 clockst=8.2. if slot=16 clockst=8.3. if slot=17 clockst=8.4. if slot=18 clockst=8.5. if slot=19 clockst=9. if slot=20 clockst=9.1. if slot=21 clockst=9.2. if slot=22 clockst=9.3. if slot=23 clockst=9.4. if slot=24 clockst=9.5. if slot=25 clockst=10. if slot=26 clockst=10.1. if slot=27 clockst=10.2. if slot=28 clockst=10.3. if slot=29 clockst=10.4. if slot=30 clockst=10.5. if slot=31 clockst=11. if slot=32 clockst=11.1. if slot=33 clockst=11.2. if slot=34 clockst=11.3. if slot=35 clockst=11.4. if slot=36 clockst=11.5. if slot=37 clockst=12. if slot=38 clockst=12.1. if slot=39 clockst=12.2. if slot=40 clockst=12.3. if slot=41 clockst=12.4. if slot=42 clockst=12.5. if slot=43 clockst=13. if slot=44 clockst=13.1. if slot=45 clockst=13.2. if slot=46 clockst=13.3. if slot=47 clockst=13.4. if slot=48 clockst=13.5. if slot=49 clockst=14. if slot=50 clockst=14.1. if slot=51 clockst=14.2. if slot=52 clockst=14.3. if slot=53 clockst=14.4. if slot=54 clockst=14.5. if slot=55 clockst=15. if slot=56 clockst=15.1. if slot=57 clockst=15.2. if slot=58 clockst=15.3. if slot=59 clockst=15.4. if slot=60 clockst=15.5. if slot=61 clockst=16. if slot=62 clockst=16.1. if slot=63 clockst=16.2. if slot=64 clockst=16.3. if slot=65 clockst=16.4. if slot=66 clockst=16.5. if slot=67 clockst=17. if slot=68 clockst=17.1. if slot=69 clockst=17.2. if slot=70 clockst=17.3. if slot=71 clockst=17.4. if slot=72 clockst=17.5. if slot=73 clockst=18. if slot=74 clockst=18.1. if slot=75 clockst=18.2. if slot=76 clockst=18.3. if slot=77 clockst=18.4. if slot=78 clockst=18.5. if slot=79 clockst=19. if slot=80 clockst=19.1. if slot=81 clockst=19.2. if slot=82 clockst=19.3. if slot=83 clockst=19.4. if slot=84 clockst=19.5. if slot=85 clockst=20. if slot=86 clockst=20.1. if slot=87 clockst=20.2. if slot=88 clockst=20.3. if slot=89 clockst=20.4. if slot=90 clockst=20.5. if slot=91 clockst=21. if slot=92 clockst=21.1. if slot=93 clockst=21.2. if slot=94 clockst=21.3. if slot=95 clockst=21.4. if slot=96 clockst=21.5. if slot=97 clockst=22. if slot=98 clockst=22.1. if slot=99 clockst=22.2. if slot=100 clockst=22.3. if slot=101 clockst=22.4. if slot=102 clockst=22.5. if slot=103 clockst=23. if slot=104 clockst=23.1. if slot=105 clockst=23.2. if slot=106 clockst=23.3. if slot=107 clockst=23.4. if slot=108 clockst=23.5. if slot=109 clockst=0. if slot=110 clockst=0.1. if slot=111 clockst=0.2. if slot=112 clockst=0.3. if slot=113 clockst=0.4. if slot=114 clockst=0.5. if slot=115 clockst=1. if slot=116 clockst=1.1. if slot=117 clockst=1.2. if slot=118 clockst=1.3. if slot=119 clockst=1.4. if slot=120 clockst=1.5. if slot=121 clockst=2. if slot=122 clockst=2.1. if slot=123 clockst=2.2. if slot=124 clockst=2.3. if slot=125 clockst=2.4. if slot=126 clockst=2.5. if slot=127 clockst=3. if slot=128 clockst=3.1. if slot=129 clockst=3.2. if slot=130 clockst=3.3. if slot=131 clockst=3.4. if slot=132 clockst=3.5. if slot=133 clockst=4. if slot=134 clockst=4.1. if slot=135 clockst=4.2. if slot=136 clockst=4.3. if slot=137 clockst=4.4. if slot=138 clockst=4.5. if slot=139 clockst=5. if slot=140 clockst=5.1. if slot=141 clockst=5.2. if slot=142 clockst=5.3. if slot=143 clockst=5.4. if slot=144 clockst=5.5. execute. format clockst (F8.2). *only 5 instances of job search while walking, code this all as just job search. temp. select if principal=1320. freq lugar. compute av=-5. compute main=-5. compute sec=-5. compute inout=-5. compute mtrav=-5. compute eloc=-5. recode ddiasem (7=1) (1=2) (2=3) (3=4) (4=5) (5=6) (6=7) (else=-8) into day. apply dictionary from 'C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\MTUS database\schema&etc\MTUSHEFschema.sav'. cro day by ddiasem. compute aw=0. if principal=1000 or principal=1110 or principal=1120 or principal=1130 or principal=1210 or principal=1220 or principal=1230 or principal=1300 or principal=1310 or principal=1320 or principal=1390 aw=1. execute. aggregate outfile=* mode=addvariables /break hldid persid /anywork=max(aw). freq anywork. Do if (lugar=11 or lugar=12 or lugar=13) and (principal=1000 or principal=1110 or principal=1120 or principal=1130 or principal=1210 or principal=1220 or principal=1230 or principal=1300 or principal=1310 or principal=1320 or principal=1390). compute av=2. Else if principal=1000 or principal=1110 or principal=1120 or principal=1130 or principal=1300 or principal=1310 or principal=1320 or principal=1390. compute av=1. Else if principal=1210 or principal=1220 or principal=1230. compute av=3. Else if principal=2000 or principal=2100 or principal=2110 or principal=2190 or principal=2210. compute av=4. Else if principal=9110 or principal=9120 or principal=9130 or principal=9210 or principal=9220. compute av=5. Else if principal=3100 or principal=3110 or principal=3120 or principal=3130 or principal=3140 or principal=3190. compute av=6. Else if principal=3000 or principal=3200 or principal=3210 or principal=3220 or principal=3300 or principal=3310 or principal=3320 or principal=3390. compute av=7. Else if principal=3230 or principal=3240 or principal=3290 or principal=3420 or principal=3430 or principal=3440 or principal=3500 or principal=3510 or principal=3520 or principal=3530 or principal=3540 or principal=3590 or principal=3710 or principal=3711 or principal=3712 or principal=3910. compute av=8. Else if principal=3400 or principal=3410 or principal=3490. compute av=9. Else if principal=3600 or principal=3610 or principal=3620 or principal=3690. compute av=10. Else if principal=3800 or principal=3810 or principal=3820 or principal=3830 or principal=3840 or principal=3890. compute av=11. Else if principal=9010 or principal=9310 or principal=9360 or principal=9380 or principal=9390. compute av=12. Else if principal=0 or principal=1 or principal=300 or principal=310 or principal=390. compute av=13. Else if principal=3630. compute av=14. Else if (principal=200 or principal=210 or principal=220 or principal=221 or principal=222 or principal=229) and lugar=16. compute av=28. Else if (principal=200 or principal=210 or principal=220 or principal=221 or principal=222 or principal=229) and lugar=14 and anywork=1. compute av=1. Else if principal=200 or principal=210 or principal=220 or principal=221 or principal=222 or principal=229. compute av=15. Else if principal=2 or principal=100 or principal=110 or principal=120. compute av=16. Else if principal=9000 or principal=9410 or principal=9420 or principal=9430 or principal=9510 or principal=9520 or principal=9610 or principal=9710 or principal=9810 or principal=9820. compute av=17. Else if principal=5200 or principal=5230 or principal=5240 or principal=5290. compute av=18. Else if principal=6000 or principal=6100 or principal=6120 or principal=6120 or principal=6130 or principal=6140 or principal=6150 or principal=6160 or principal=6170 or principal=6190 or principal=6210 or principal=6310. compute av=19. Else if principal=5250. compute av=20. Else if principal=6110 or principal=6200 or principal=6220 or principal=6290. compute av=21. Else if principal=4320. compute av=22. Else if principal=4000 or principal=4100 or principal=4110 or principal=4120 or principal=4190 or principal=4200 or principal=4210 or principal=4220 or principal=4230 or principal=4240 or principal=4250 or principal=4260 or principal=4270 or principal=4280 or principal=4290 or principal=4300 or principal=4310 or principal=4390 or principal=9950 or principal=9960. compute av=23. Else if principal=5210 or principal=5220 or principal=5221 or principal=5222 or principal=5223. compute av=24. Else if principal=5130. compute av=25. Else if (principal=5000 or principal=5100 or principal=5120 or principal=5190) and lugar=16. compute av=27. Else if (principal=5000 or principal=5100 or principal=5120 or principal=5190) and (lugar=10 or lugar>13). compute av=29. Else if principal=5000 or principal=5100 or principal=5120 or principal=5190. compute av=38. Else if principal=8300 or principal=8310. compute av=30. Else if principal=8000 or principal=8200 or principal=8210 or principal=8220. compute av=31. Else if principal=8320. compute av=32. Else if principal=2120. compute av=33. Else if principal=8100 or principal=8120. compute av=34. Else if principal=8110 or principal=8111 or principal=8112 or principal=8113 or principal=8190. compute av=35. Else if principal=5300 or principal=5310. compute av=36. Else if principal=5110 or principal=5140 or principal=7280 or principal=7281 or principal=7282. compute av=37. Else if principal=3330. compute av=39. Else if principal=7000 or principal=7100 or principal=7110 or principal=7111 or principal=7112 or principal=7113 or principal=7114 or principal=7120 or principal=7121 or principal=7122 or principal=7123 or principal=7130 or principal=7190 or principal=7200 or principal=7210 or principal=7220 or principal=7230 or principal=7240 or principal=7241 or principal=7242 or principal=7243 or principal=7250 or principal=7260 or principal=7270 or principal=7290 or principal=7300 or principal=7310 or principal=7320 or principal=7330 or principal=7340 or principal=7390 or principal=9990. compute av=40. Else if principal=3 or principal=9900 or principal=9980. compute av=41. End if. freq av. temp. select if av=41. freq principal lugar. if lugar=21 and (principal=110 or principal=210 or principal=221 or principal=222 or principal=229 or principal=310 or principal=3110 or principal=3130 or principal=3240 or principal=3310 or principal=3320 or principal=3330 or principal=3390 or principal=8210) lugar=12. execute. Do if lugar=23 or lugar=24 or lugar=25 or lugar=31 or (principal=9820 and ((lugar>21 and lugar<30) or lugar=40)). compute mtrav=1. Else if lugar=30 or lugar=32 or lugar=33 or lugar=34 or lugar=35 or lugar=36 or lugar=39. compute mtrav=2. Else if lugar=21 or principal=3440 or principal=6110. compute mtrav=3. Else if lugar=22 or principal=6130. compute mtrav=4. Else if lugar=40 or (principal>8999 and principal<9820). compute mtrav=5. Else. compute mtrav=-7. End if. freq mtrav. temp. select if mtrav=3. freq principal lugar. recode segunda (sysmis=0). execute. compute epnum=1. execute. Do if slot>1. Do if principal ne lag(principal) or segunda ne lag(segunda) or ict ne lag(ict) or lugar ne lag(lugar) or alone ne lag(alone) or child ne lag(child) or otmie ne lag(otmie) or oad ne lag(oad). compute epnum=lag(epnum)+1. Else. compute epnum=lag(epnum). End if. End if. freq epnum. cro epnum by slot. Do if lugar=11 or lugar=12 or lugar=13. compute eloc=1. Else if lugar=15. compute eloc=2. Else if (lugar=10 or lugar=14) and (principal>1999 and principal<3000). compute eloc=4. Else if (lugar=10 or lugar=14) and (principal>999 and principal<2000). compute eloc=3. Else if lugar=53 or (lugar=19 and (principal>3599 and principal<3710)). compute eloc=5. Else if lugar=16. compute eloc=6. Else if (lugar=19) and principal=4320. compute eloc=7. Else if (lugar>19 and lugar<41) or (principal>8999 and principal<9900). compute eloc=8. Else if lugar>16. compute eloc=9. Else if principal>3599 and principal<3710. compute eloc=5. Else if (principal>5199 and principal<5291) or principal=6000 or (principal>6109 and principal<6151) or principal=6170 or principal=6210 or principal=6220 or principal=6290. compute eloc=9. Else if lugar=10. compute eloc=-8. end if. if mtrav=3 or mtrav=4 and eloc<0 eloc=8. freq eloc. *14039 time slots at code 14 (workplace or education) not yet assigned in eloc. *if in a sequence at work, code at work; if in a sequence at school, code at school. Do if eloc=-5 and hldid=lag(hldid) and persid=lag(persid) and (lag(eloc)=3 or lag(principal)=9130). compute eloc=3. Else if eloc=-5 and hldid=lag(hldid) and persid=lag(persid) and (lag(eloc)=4 or lag(principal)=9210). compute eloc=4. End if. freq eloc. *now 1720 unassigned eloc=-5 cases. sort cases by hldid (a) persid(a) slot(d). Do if eloc=-5 and hldid=lag(hldid) and persid=lag(persid) and (lag(eloc)=3 or lag(principal)=9130). compute eloc=3. Else if eloc=-5 and hldid=lag(hldid) and persid=lag(persid) and (lag(eloc)=4 or lag(principal)=9210). compute eloc=4. End if. sort cases by hldid (a) persid(a) slot(a). *1307 -5 eloc cases left. cro eloc by lugar principal mtrav. Do if hldid=949 and persid=3 and (slot=91 or slot=92 or slot=93). compute av=15. compute eloc=1. Else if hldid=949 and persid=3 and eloc=-5. compute eloc=1. end if. Do if hldid=1067 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=1263 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=2200 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=2240 and persid=3 and (slot>64 and slot<75). compute eloc=4. Else if hldid=2240 and persid=3 and eloc=-5. compute eloc=1. end if. Do if hldid=2455 and persid=4 and eloc=-5 and slot>124. compute eloc=1. end if. Do if hldid=2695 and persid=3 and eloc=-5. compute eloc=1. end if. Do if hldid=3706 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=5053 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=5784 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=6033 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=6185 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=6620 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=6768 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=7009 and persid=3 and eloc<0 and (slot>74 and slot<94). compute eloc=1. end if. Do if hldid=7251 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=7302 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=7861 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=9139 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=11270 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=11635 and persid=1 and eloc=-5. compute av=15. compute eloc=1. End if. Do if hldid=11685 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=12478 and persid=2 and (slot>15 and slot<19). compute eloc=1. end if. Do if hldid=12478 and persid=2 and (slot>63 and slot<77). compute eloc=1. end if. Do if hldid=13631 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=13928 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=14293 and persid=1 and (slot>50 and slot<58). compute eloc=1. end if. Do if hldid=14668 and persid=3 and eloc=-5. compute eloc=1. end if. Do if hldid=16995 and persid=1 and eloc=-5 and principal=210. compute av=15. compute eloc=1. Else if hldid=16995 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=18489 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=18547 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=18703 and persid=5 and eloc=-5. compute eloc=1. end if. Do if hldid=19082 and persid=1 and eloc=-5. compute eloc=1. end if. Do if hldid=19666 and persid=2 and eloc=-5 and principal=210. compute av=15. compute eloc=1. Else if hldid=19666 and persid=2 and eloc=-5. compute eloc=1. end if. Do if hldid=20418 and persid=1 and eloc=-5 and principal=210. compute av=15. compute eloc=1. Else if hldid=20418 and persid=1 and eloc=-5. compute eloc=1. end if. execute. *mostly these are cases where the activity sequence points to own home, *except these, which is religious activity elsewhere away from home. Do if hldid=4871 and persid=3 and eloc=-5. compute eloc=7. end if. Do if hldid=18456 and persid=1 and eloc=-5. compute eloc=7. end if. execute. *and these one which looks like a meal purchased and taken back to work. Do if hldid=5359 and persid=1 and eloc=-5. compute eloc=3. end if. Do if hldid=17191 and persid=3 and eloc=-5. compute eloc=3. end if. *and these one, where it seems the diarist might be collecting a child from school. Do if hldid=8806 and persid=2 and eloc=-5. compute eloc=4. end if. Do if hldid=12514 and persid=1 and (slot>46 and slot<55). compute eloc=4. end if. Do if hldid=12514 and persid=2 and (slot>46 and slot<55). compute eloc=4. end if. Do if hldid=13893 and persid=3 and eloc=-5. compute eloc=4. end if. execute. *remaining cases sequence in between travel, and often gardening or *voluntary activity. Code as other specified. Do if hldid=7288 and persid=3 and eloc<0 and (slot>85 and slot<115). compute eloc=9. end if. If eloc=-5 eloc=9. freq eloc. cro eloc by lugar principal mtrav. *129962 missing location time slots. *where someone doing the same activity at an unknown place and the previous slot has known *activity, extend the same place to the same activity. Do if eloc=-8 and lag(eloc)>0 and hldid=lag(hldid) and persid=lag(persid) and av=lag(av). compute eloc=lag(eloc). End if. freq eloc. *128337 missing location time slots. sort cases by hldid (a) persid(a) slot(d). Do if eloc=-8 and lag(eloc)>0 and hldid=lag(hldid) and persid=lag(persid) and av=lag(av). compute eloc=lag(eloc). End if. freq eloc. *126017 missing location time slots. sort cases by hldid (a) persid(a) slot(a). Do if (lugar>23 and lugar<41) or mtrav=1 or lugar=20. compute inout=3. Else if lugar=21 or lugar=22 or lugar=23 or lugar=51 or lugar=52 or lugar=54. compute inout=2. Else if principal=3220 or principal=3230 or principal=3400 or principal=3410 or principal=3420 or principal=3440 or principal=3490 or principal=4230 or principal=6000 or principal=6110 or principal=6120 or principal=6130 or principal=6200 or principal=6210 or principal=6220 or principal=6290. compute inout=2. Else if eloc=8. compute inout=3. Else if principal=1 or principal=110 or principal=120 or principal=3110 or principal=3130 or principal=3140 or principal=3190 or principal=3320 or principal=3390 or principal=4210 or principal=4250 or principal=7110 or principal=7111 or principal=7330 or principal=8210 or principal=8220 or (principal>7219 and principal<7250). compute inout=1. Else if eloc=-8. compute inout=-8. Else. compute inout=1. End if. freq inout. cro inout by lugar eloc mtrav principal. Do if hldid=lag(hldid) and persid=lag(persid) and (eloc=1 or eloc=2 or eloc=3 or eloc=4 or eloc=5 or eloc=7) and (lag(eloc)=1 or lag(eloc)=2 or lag(eloc)=3 or lag(eloc)=4 or lag(eloc)=5 or lag(eloc)=7) and eloc ne lag(eloc) and segunda=0. compute sec=62. Else if segunda=0. compute sec=69. Else if segunda=1 and (eloc=3 or eloc=4). compute sec=5. Else if segunda=1 and eloc=6. compute sec=39. Else if segunda=1. compute sec=6. Else if segunda=2. compute sec=4. Else if segunda=3 and eloc=1. compute sec=8. Else if segunda=3. compute sec=7. Else if segunda=4. compute sec=12. Else if segunda=5. compute sec=16. Else if segunda=6. compute sec=23. Else if segunda=7. compute sec=21. Else if segunda=8. compute sec=27. Else if segunda=9. compute sec=31. Else if segunda=10. compute sec=33. Else if segunda=11. compute sec=35. Else if segunda=12 and inout=2. compute sec=45. Else if segunda=12 and (eloc=1 or eloc=2). compute sec=51. Else if segunda=12. compute sec=35. Else if segunda=13. compute sec=56. Else if segunda=14. compute sec=59. Else if segunda=15. compute sec=58. Else if segunda=16 and (eloc=1 or eloc=2). compute sec=51. Else if segunda=16. compute sec=35. End if. temp. select if sec=-5. freq segunda. *first line and 25 missing cells. recode sec (-5=69). freq sec. cro sec by segunda. recode oad otmie (6=0). freq child oad otmie alone. temp. select if principal=1310. freq eloc. Do if principal=1. compute main=1. Else if principal=100 or principal=110 or principal=120. compute main=2. Else if principal=2. compute main=3. Else if principal=0 or principal=300 or principal=310 or principal=390. compute main=4. Else if principal=1310 and (eloc=3 or eloc=6). compute main=5. Else if principal=1310. compute main=12. Else if (principal>199 and principal<300) and (eloc=3 or eloc=4). compute main=5. Else if (principal>199 and principal<300) and eloc=6. compute main=39. Else if principal>199 and principal<300. compute main=6. Else if (principal=1000 or principal=1110 or principal=1130 or principal=1210 or principal=1230) and (eloc=1). compute main=8. Else if (principal=1000 or principal=1110 or principal=1130 or principal=1210 or principal=1230) and (eloc=8). compute main=11. Else if principal=1000 or principal=1110 or principal=1130. compute main=7. Else if principal=1210 or principal=1230. compute main=9. Else if principal=9110 or principal=9120. compute main=11. Else if principal=1120 or principal=1220. compute main=12. Else if principal=1300 or principal=1390. compute main=13. Else if principal=1320. compute main=14. Else if principal=2000 or principal=2100 or principal=2110. compute main=15. Else if principal=2120. compute main=16. Else if principal=2190 or principal=2210. compute main=17. Else if principal=3100 or principal=3110 or principal=3120 or principal=3140 or principal=3190. compute main=18. Else if principal=3130. compute main=19. Else if principal=3200 or principal=3210 or principal=3220 or principal=3290. compute main=20. Else if principal>3299 and principal<3400. compute main=21. Else if principal=3230 or principal=3420 or principal=3500 or principal=3510 or principal=3520 or principal=3530 or principal=3540 or principal=3590. compute main=22. Else if principal=3000 or principal=3240 or principal=3700 or principal=3710 or principal=3711 or principal=3712. compute main=23. Else if principal=3600 or principal=3610. compute main=24. Else if principal=3630. compute main=25. Else if principal=3620 or principal=3690. compute main=26. Else if principal=3430. compute main=27. Else if principal=3800 or principal=3810 or principal=3890. compute main=28. Else if principal=3820. compute main=29. Else if principal=3830. compute main=30. Else if principal=3840 or principal=4270. compute main=31. Else if principal=3900 or principal=3910 or principal=4280. compute main=32. Else if (principal>3999 and principal<4270) or (principal>4280 and principal<4320) or principal=4390 or principal=9950 or principal=9960. compute main=33. Else if principal=4320. compute main=34. Else if principal=5000. compute main=35. Else if principal=5250. compute main=36. Else if principal=5210 or principal=5220 or principal=5221 or principal=5222 or principal=5223. compute main=37. Else if (principal=5200 or principal=5230 or principal=5240 or principal=5290) and eloc>2. compute main=38. Else if principal=5200 or principal=5230 or principal=5240 or principal=5290. compute main=50. Else if (principal=5100 or principal=5110 or principal=5190) and eloc=6. compute main=39. Else if (principal=5100 or principal=5110 or principal=5190) and eloc=2. compute main=48. Else if principal=5110 and eloc<2. compute main=50. Else if principal=5100 or principal=5110 or principal=5190. compute main=40. Else if principal=7340 or principal=5130. compute main=40. Else if principal=3. compute main=41. Else if principal=6000 or principal=6100 or principal=6120 or principal=6140 or principal=6150 or principal=6160 or principal=6170 or principal=6190 or principal=6300 or principal=6310. compute main=42. Else if principal=6110. compute main=43. Else if principal=6130. compute main=44. Else if principal=3400 or principal=3410 or principal=3490 or principal=6200 or principal=6210 or principal=6220 or principal=6290. compute main=46. Else if principal=3440. compute main=47. Else if principal=5120. compute main=48. Else if principal=5140 or principal=7280 or principal=7282. compute main=49. Else if principal=7300 or principal=7310 or principal=7320 or principal=7390. compute main=50. Else if principal=7000 or principal=7100 or principal=9990. compute main=51. Else if principal>7109 and principal<7131. compute main=52. Else if principal=7260. compute main=53. Else if principal=7190 or principal=7200 or principal=7210 or principal=7290. compute main=54. Else if principal=5300 or principal=5310. compute main=55. Else if principal>8099 and principal<8191. compute main=56. Else if principal=8300 or principal=8320. compute main=57. Else if principal=8310. compute main=58. Else if principal=8000 or (principal>8199 and principal<8221). compute main=59. Else if principal=7330. compute main=60. Else if principal=7270 or principal=7281 or (principal>7219 and principal<7260). compute main=61. Else if principal=9810. compute main=62. Else if principal=9130. compute main=63. Else if principal=9210 or principal=9220. compute main=64. Else if principal=9410 or principal=9420 or principal=9430. compute main=65. Else if principal=9380 or principal=9390. compute main=66. Else if principal=9010 or principal=9310 or principal=9360. compute main=67. Else if principal=9000 or principal=9510 or principal=9520 or principal=9610 or principal=9710 or principal=9820. compute main=68. Else if principal=9900 or principal=9980. compute main=69. End if. freq main. temp. select if main=69. cro principal by eloc. *create markers for diary quality variable. compute slp=0. if principal=2 or principal=100 or principal=110 or principal=120 or principal=5300 or principal=5310 slp=1. compute etdr=0. if (principal>120 and principal<300) or principal=1120 or principal=1220 or principal=1310 or (principal>3000 and principal<3200) or principal=4210 etdr=1. compute pc=0. if principal=0 or principal=1 or principal=300 or principal=310 or principal=390 or principal=3630 pc=1. compute xtrv=0. if principal=3230 or (principal>3399 and principal<3600) or principal=4220 or principal=4230 or principal=4240 or (principal>5999 and principal<7000) or eloc=8 or sec=62xtrv=1. cro principal eloc by slp etdr pc xtrv. *four problem cases where episode did not calculate correctly - *many hours seeking the cause, but for an unidentified reason, *the episode count resets to 1 partway through the diary. *cause might be secondary activity with empty cells not *filled before calculation of epnum. *if hldid=9264 and persid=3 and slot>30 epnum=epnum+5. *if hldid=11797 and persid=1 and slot>109 epnum=epnum+15. *if hldid=17495 and persid=1 and slot>85 epnum=epnum+19. *if hldid=20468 and persid=1 and slot>90 epnum=epnum+17. *execute. aggregate outfile='C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\mtus data\countries\Spain\2002-03\es2002hef-int.sav' /break hldid persid epnum /slp=MAX(slp) /etdr=MAX(etdr) /pc=MAX(pc) /xtrv=MAX(xtrv) /day=max(day) /clockst=MIN(clockst) /start=MIN(start) /end=MAX(end) /main=MAX(main) /sec=MAX(sec) /av=MAX(av) /inout=MAX(inout) /eloc=MAX(eloc) /ict=MAX(ict) /mtrav=MAX(mtrav) /alone=MAX(alone) /child=MAX(child) /otmie=MAX(otmie) /oad=MAX(oad) /animal=MAX(animal) /time=SUM(slottm). *final fixes. get file='C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\mtus data\countries\Spain\2002-03\es2002hef-int.sav'. if (main=60 or sec=60 or main=61 or sec=61) and ict=0 ict=1. freq ict. if (main=35 or sec=35) and eloc=-8 eloc=9. freq eloc. compute test=0. if eloc=-8 and (main=34 or sec=34) test=1. freq test. if hldid=291 and persid=1 and (epnum=6 or epnum=15 or epnum=20 or epnum=26) eloc=7. if hldid=291 and persid=1 and (epnum=12 or epnum=13 or epnum>27) eloc=1. if hldid=291 and persid=2 and (epnum=6 or epnum=7 or epnum=8 or (epnum>15 and epnum<22)) eloc=7. if hldid=291 and persid=2 and (epnum=10 or epnum=24 or epnum>25) eloc=1. Do if hldid=301 and persid=1 and epnum=25. compute inout=1. compute eloc=1. Else if hldid=301 and persid=1 and (epnum=27 or epnum=28). compute inout=1. compute eloc=2. End if. Do if hldid=301 and persid=2 and main=34 and eloc=-8. compute inout=1. compute eloc=7. End if. Do if hldid=lag(hldid) and persid=lag(persid) and main=34 and eloc=-8 and lag(eloc)=8. compute inout=1. compute eloc=7. End if. Do if hldid=1774 and persid=1 and (epnum=11 or epnum=14 or epnum=15). compute inout=1. compute eloc=7. Else if hldid=1774 and persid=1 and (epnum=18 or epnum=19 or epnum=20). compute inout=1. compute eloc=1. End if. Do if hldid=lag(hldid) and persid=lag(persid) and main=34 and eloc=-8 and lag(eloc)=1. compute inout=1. compute eloc=1. End if. Do if hldid=3813 and persid=1 and (epnum>8 and epnum<14). compute inout=1. compute eloc=7. End if. Do if hldid=4440 and persid=1 and (epnum>28 and epnum<32). compute inout=1. compute eloc=7. End if. Do if hldid=5273 and persid=1 and (epnum>24 and epnum<27). compute inout=1. compute eloc=7. End if. Do if hldid=5273 and (persid=2 or persid=4) and (epnum>18 and epnum<21). compute inout=1. compute eloc=7. End if. Do if hldid=10550 and persid=1 and epnum=10. compute inout=1. compute eloc=7. Else if hldid=10550 and persid=1 and epnum=11. compute main=5. compute inout=1. compute eloc=3. End if. Do if hldid=11007 and persid=1 and epnum=7. compute inout=1. compute eloc=7. Else if hldid=11007 and persid=1 and epnum>7. compute inout=1. compute eloc=1. End if. Do if hldid=11171 and persid=1 and (epnum>13 and epnum<18). compute inout=1. compute eloc=7. End if. Do if hldid=12052 and persid=3 and (epnum>8 and epnum<11). compute inout=1. compute eloc=7. End if. Do if hldid=12547 and persid=5 and (epnum>23 and epnum<28). compute inout=1. compute eloc=7. End if. Do if hldid=13449 and persid=1 and (epnum>23 and epnum<26). compute inout=1. compute eloc=7. End if. Do if hldid=13619 and persid=1 and (epnum>15 and epnum<19). compute inout=1. compute eloc=7. End if. Do if hldid=14572 and persid=1 and (epnum>14 and epnum<17). compute inout=1. compute eloc=7. End if. Do if hldid=16147 and persid=3 and ((epnum>0 and epnum<6) or epnum>19). compute inout=1. compute eloc=1. End if. Do if hldid=17726 and persid=5 and epnum<7. compute inout=1. compute eloc=1. End if. Do if hldid=18117 and persid=4 and epnum=23. compute inout=1. compute eloc=7. End if. Do if hldid=18644 and persid=2 and (epnum>15 and epnum<19). compute inout=1. compute eloc=7. End if. Do if hldid=20582 and persid=1 and (epnum>14 and epnum<17). compute inout=1. compute eloc=1. End if. execute. compute test=0. if mtrav=-7 and inout=3 test=1. freq test. *These are odd cases where the person entered an activity which is not travel, *but they have entered a location of being in a vehicle travelling – this is *unusual, but also how the diarists reported their day, and these reports remain *as they appear in the diary data, though mtrav is set to travel. if test=1 mtrav=5. execute. if inout=-8 and eloc=7 inout=1. save outfile='C:\Users\Kimberly Fisher\Desktop\Kimberly\time\mtus\mtus data\countries\Spain\2002-03\es2002hef-int.sav' /drop test.