#NDK 7: Beat Jaggi ; 
#must-lebensq aus ueb-03-mu2a-3
#R

library(mva)

## -------------------------  get data  ---------------------------
## count.fields(file="/u/sfs/datasets/NDK/lebensq.dat",sep="\t")
d.lebensq <- read.table("/u/sfs/datasets/NDK/lebensq.dat",header=T,sep="\t")
## dim(d.lebensq)   

## lange Labels von Fragen
t.labelsl <- c("Alltagstätigkeit","Erholung.nachts","Bewegungen","Kribbeln.Beinen","Empfindlichkeit","Heben.Tragen","Angst.falsche.Bewegung","Auffallen","Haeufigkeit","schwache.Beine","Arbeitsplatz.Heben","Sport","Bewegungsmangel","Sport.Anschluss","Arbeit.Sitzen","Freizeit.Sitzen","Erscheinung","Abhaengigkeit","Hilfe.organisieren","zeitlich.gebunden","ausgeliefert","Verkehrsmittel","Angst.Sturz","Zukunft","Alltag.arrangieren","absagen","Sexualitaet","Beeintr.Gehen","absagen.sitzen","lang.sitzen","lange.Wege","unbeschw.bewegen","alleine.Ankleiden","Koerperpflege","Arbeit.Haushalt","Hilfe.Haushalt","Haushalt.vernachl","Hobbies","33x","schlafen","34x","liegen.schlafen","schlecht.gelaunt","nicht.beeinflussen","Vorwuerfe","Tage.nichtausgefuellt","Angst.Arbeit.verlieren","Arbeit.reduziert","Arbeit.verpasst","42x","Partner.muss.verzichten","Familien.Aufgaben","Familie.nicht.verstanden","Familienaktivitaeten","46x","Alltag.nicht.verstanden","ausgeschlossen","Selbstvertrauen","lustlos")

## kurze Labels von Fragen
t.labelsk <- c("Alltag","Erh.nachts","Bew","Kribbeln","Empf","Heb.Trag","A.falsch.Bew","Auffallen","Haeuf","schw.Beine","Arb.Heb","Sport","Bewmangel","Sp.Anschl","Arb.Sitz","Freiz.Sitz","Ersch","Abh","Hilfe.org","zeitl.geb","ausgel","Verkehrsm","A.Sturz","Zukunft","Allt.arrang","absagen","Sex","Beeintr.Gehen","abs.sitz","lang.sitz","lang.Weg","unbeschw.bew","Ankl","Koerppfl","Arb.Haush","Hilfe.Haush","Haush.vern","Hobbies","33x","schlafen","34x","liegen.schlafen","Laune","nicht.beeinfl","Vorw","Tage.nichtausgef","A.Arb.verl","Arb.red","Arb.verp","42x","Partn.verzicht","Fam.Aufg","Fam.nverst","Fam.aktivit","46x","Allt.nverst","ausgeschl","Selbstvert","lustlos")

t.d <- d.lebensq 
names(t.d)[15:74] # "Fragen"