scales <- list(
fas = c("fa_01", "fa_02", "fa_03", "fa_04", "fa_05",
"fa_06", "fa_07", "fa_08", "fa_09", "fa_10", "fa_11", "fa_12",
"fa_13", "fa_14", "fa_15", "fa_16", "fa_17", "fa_18", "fa_19",
"fa_20", "fa_21", "fa_22", "fa_23", "fa_24", "fa_25", "fa_26",
"fa_27", "fa_28", "fa_29"),
fas_repeat = c("fa_t2_01",
"fa_t2_02", "fa_t2_03", "fa_t2_04", "fa_t2_05", "fa_t2_06", "fa_t2_07",
"fa_t2_08", "fa_t2_09", "fa_t2_10", "fa_t2_11", "fa_t2_12", "fa_t2_13",
"fa_t2_14", "fa_t2_15", "fa_t2_16", "fa_t2_17", "fa_t2_18", "fa_t2_19",
"fa_t2_20", "fa_t2_21", "fa_t2_22", "fa_t2_23", "fa_t2_24", "fa_t2_25",
"fa_t2_26", "fa_t2_27", "fa_t2_28", "fa_t2_29")
)
labels <- list(
fa_01 = "Meine Zukunft ist ungewiss.",
fa_02 = "Ich bin besorgt, dass bald eine Katastrophe eintreten wird.",
fa_03 = "Ich erschauere vor Angst bei dem Gedanken, was der nächste Tag, der nächste Monat, das nächste Jahr bringt.",
fa_04 = "Ich bin mir sicher, dass ich in der Zukunft nicht allein sein werde oder zurückgewiesen werde.",
fa_05 = "Ich habe Angst, die Zukunft zu planen.",
fa_06 = "Ich bin über mögliche Missgeschicke besorgt.",
fa_07 = "Ich fürchte, dass ich an wachsenden Schwierigkeiten scheitern werde.",
fa_08 = "Ich sorge mich um die Fehlschläge, die auf mich zukommen.",
fa_09 = "Ich bin durch den Gedanken verängstigt, dass ich manchmal Lebenskrisen oder Schwierigkeiten gegenüberstehen könnte.",
fa_10 = "Ich bin angespannt und mir ist unbehaglich, wenn ich an meine künftigen Angelegenheiten denke.",
fa_11 = "Ich bin mir sicher, dass ich in der Zukunft die wichtigsten Ziele und Werte in meinem Leben erreichen werde.",
fa_12 = "Ich mache mir Sorgen, dass ich meiner Familie keine guten materiellen Bedingungen bieten kann.",
fa_13 = "Ich habe das Gefühl, dass die Welt auf einen Kollaps, ein apokalyptisches Ende, zusteuert.",
fa_14 = "Ich fürchte mich vor dem Moment, in dem ich Verantwortung für die Entscheidungen und Handlungen in meinem Leben übernehmen muss.",
fa_15 = "Je näher ich dem Tod komme, desto mehr fürchte ich mich vor ihm.",
fa_16 = "Ich glaube, dass ich in der Zukunft fähig bin, meine Probleme selbst zu lösen.",
fa_17 = "Ich bin besorgt, dass wirtschaftlich-politische Veränderungen meine Zukunft gefährden.",
fa_18 = "Ich bin von dem Gedanken verängstigt, dass das Leben schnell vorübergeht.",
fa_19 = "Ich bin von dem Gedanken beunruhigt, dass ich in der Zukunft nicht fähig sein werde, meine Ziele zu verwirklichen.",
fa_20 = "Ich bin besorgt, dass die Probleme, die mich momentan beschäftigen, noch lange Zeit anhalten werden.",
fa_21 = "Selbst wenn die Dinge gut laufen, wird sich das Schicksal gegen mich wenden.",
fa_22 = "Ich bin von der Möglichkeit eines plötzlichen Unfalls oder einer ernsthaften Krankheit (z.B. AIDS, Krebs) beunruhigt.",
fa_23 = "Es ist lebenswert in dieser schönen, sich stetig weiter entwickelnden Welt.",
fa_24 = "Ich bin nicht besorgt, dass die Menschen in der Zukunft „Raubtiere“ zueinander sein werden.",
fa_25 = "Ich bin besorgt, dass andere in der Zukunft eine schlechte Meinung von mir haben werden.",
fa_26 = "Ich bin besorgt, dass ich mein Leben in einigen Jahren als sinnlos bewerte.",
fa_27 = "Ich bin besorgt, dass sich mein Leben in der Zukunft zum Schlechten wenden wird.",
fa_28 = "Ich bin besorgt, dass ich in meinem Beruf künftig nicht anerkannt werde.",
fa_29 = "Ich sorge mich, dass ich im Alter jemandem zur Last fallen werde."
)
dat <- wmisc::add_label(dat, labels)FAS-D
FAS
Factor analysis
Abstract
.
wmisc::nice_item_analysis(dat, scales = scales$fas, labels = unlist(labels))! Scales must be provided in a list. Turned values into list.
| Table Item analysis |
|||||
| Labels | M | SD | rit | ΔAlpha | Loadings |
|---|---|---|---|---|---|
| scale n = 338; Alpha = .93; Std. alpha = .93; Homogeneity = .33 |
|||||
| Meine Zukunft ist ungewiss. | 2.69 | 1.61 | 0.48 | 0.00 | 0.50 |
| Ich bin besorgt, dass bald eine Katastrophe eintreten wird. | 1.83 | 1.51 | 0.45 | 0.00 | 0.43 |
| Ich erschauere vor Angst bei dem Gedanken, was der nächste Tag, der nächste Monat, das nächste Jahr bringt. | 0.99 | 1.35 | 0.66 | 0.00 | 0.69 |
| Ich bin mir sicher, dass ich in der Zukunft nicht allein sein werde oder zurückgewiesen werde. | 1.80 | 1.69 | 0.42 | 0.00 | -0.45 |
| Ich habe Angst, die Zukunft zu planen. | 1.78 | 1.62 | 0.65 | 0.00 | 0.68 |
| Ich bin über mögliche Missgeschicke besorgt. | 2.41 | 1.73 | 0.60 | 0.00 | 0.64 |
| Ich fürchte, dass ich an wachsenden Schwierigkeiten scheitern werde. | 2.28 | 1.72 | 0.74 | 0.00 | 0.79 |
| Ich sorge mich um die Fehlschläge, die auf mich zukommen. | 2.16 | 1.67 | 0.74 | 0.00 | 0.79 |
| Ich bin durch den Gedanken verängstigt, dass ich manchmal Lebenskrisen oder Schwierigkeiten gegenüberstehen könnte. | 2.10 | 1.74 | 0.74 | 0.00 | 0.78 |
| Ich bin angespannt und mir ist unbehaglich, wenn ich an meine künftigen Angelegenheiten denke. | 2.19 | 1.66 | 0.71 | 0.00 | 0.76 |
| Ich bin mir sicher, dass ich in der Zukunft die wichtigsten Ziele und Werte in meinem Leben erreichen werde. | 1.79 | 1.25 | 0.56 | 0.00 | -0.59 |
| Ich mache mir Sorgen, dass ich meiner Familie keine guten materiellen Bedingungen bieten kann. | 1.68 | 1.59 | 0.55 | 0.00 | 0.55 |
| Ich habe das Gefühl, dass die Welt auf einen Kollaps, ein apokalyptisches Ende, zusteuert. | 1.72 | 1.90 | 0.33 | 0.00 | 0.32 |
| Ich fürchte mich vor dem Moment, in dem ich Verantwortung für die Entscheidungen und Handlungen in meinem Leben übernehmen muss. | 1.68 | 1.68 | 0.67 | 0.00 | 0.70 |
| Je näher ich dem Tod komme, desto mehr fürchte ich mich vor ihm. | 1.58 | 1.70 | 0.39 | 0.00 | 0.38 |
| Ich glaube, dass ich in der Zukunft fähig bin, meine Probleme selbst zu lösen. | 1.43 | 1.17 | 0.53 | 0.00 | -0.55 |
| Ich bin besorgt, dass wirtschaftlich-politische Veränderungen meine Zukunft gefährden. | 2.91 | 1.65 | 0.38 | 0.00 | 0.37 |
| Ich bin von dem Gedanken verängstigt, dass das Leben schnell vorübergeht. | 2.49 | 1.90 | 0.48 | 0.00 | 0.47 |
| Ich bin von dem Gedanken beunruhigt, dass ich in der Zukunft nicht fähig sein werde, meine Ziele zu verwirklichen. | 2.31 | 1.62 | 0.72 | 0.00 | 0.74 |
| Ich bin besorgt, dass die Probleme, die mich momentan beschäftigen, noch lange Zeit anhalten werden. | 2.70 | 1.78 | 0.67 | 0.00 | 0.69 |
| Selbst wenn die Dinge gut laufen, wird sich das Schicksal gegen mich wenden. | 0.93 | 1.37 | 0.60 | 0.00 | 0.62 |
| Ich bin von der Möglichkeit eines plötzlichen Unfalls oder einer ernsthaften Krankheit (z.B. AIDS, Krebs) beunruhigt. | 2.21 | 1.66 | 0.35 | 0.00 | 0.34 |
| Es ist lebenswert in dieser schönen, sich stetig weiter entwickelnden Welt. | 1.27 | 1.30 | 0.43 | 0.00 | -0.44 |
| Ich bin nicht besorgt, dass die Menschen in der Zukunft „Raubtiere“ zueinander sein werden. | 2.28 | 1.85 | 0.17 | 0.00 | -0.17 |
| Ich bin besorgt, dass andere in der Zukunft eine schlechte Meinung von mir haben werden. | 2.08 | 1.74 | 0.60 | 0.00 | 0.63 |
| Ich bin besorgt, dass ich mein Leben in einigen Jahren als sinnlos bewerte. | 1.80 | 1.80 | 0.70 | 0.00 | 0.72 |
| Ich bin besorgt, dass sich mein Leben in der Zukunft zum Schlechten wenden wird. | 1.81 | 1.71 | 0.77 | -0.01 | 0.79 |
| Ich bin besorgt, dass ich in meinem Beruf künftig nicht anerkannt werde. | 2.02 | 1.75 | 0.62 | 0.00 | 0.65 |
| Ich sorge mich, dass ich im Alter jemandem zur Last fallen werde. | 2.44 | 1.85 | 0.35 | 0.00 | 0.35 |
| Note. rit is the item-total correlation. Homogeneity is the average inter-item correlation. Difficulty is mean rescaled to [0,1]. ΔAlpha is the change in raw alpha when the item is dropped. Loadings are based on a one factor exploratory factor analysis. | |||||
dat[, scales$fas] |>
wmisc::rename_from_labels(keep = TRUE) |>
psych::fa(nfactors = 1) |>
wmisc::nice_efa()| Table Loading matrix |
|||
| Variables |
Factors
|
Communalities | Complexity |
|---|---|---|---|
| MR1 | |||
| Loadings | |||
| fa_07: Ich fürchte, dass ich an wachsenden Schwierigkeiten scheitern werde. | 0.79 | 0.63 | 1 |
| fa_27: Ich bin besorgt, dass sich mein Leben in der Zukunft zum Schlechten wenden wird. | 0.79 | 0.62 | 1 |
| fa_08: Ich sorge mich um die Fehlschläge, die auf mich zukommen. | 0.79 | 0.62 | 1 |
| fa_09: Ich bin durch den Gedanken verängstigt, dass ich manchmal Lebenskrisen oder Schwierigkeiten gegenüberstehen könnte. | 0.78 | 0.61 | 1 |
| fa_10: Ich bin angespannt und mir ist unbehaglich, wenn ich an meine künftigen Angelegenheiten denke. | 0.76 | 0.58 | 1 |
| fa_19: Ich bin von dem Gedanken beunruhigt, dass ich in der Zukunft nicht fähig sein werde, meine Ziele zu verwirklichen. | 0.74 | 0.54 | 1 |
| fa_26: Ich bin besorgt, dass ich mein Leben in einigen Jahren als sinnlos bewerte. | 0.72 | 0.52 | 1 |
| fa_14: Ich fürchte mich vor dem Moment, in dem ich Verantwortung für die Entscheidungen und Handlungen in meinem Leben übernehmen muss. | 0.7 | 0.5 | 1 |
| fa_03: Ich erschauere vor Angst bei dem Gedanken, was der nächste Tag, der nächste Monat, das nächste Jahr bringt. | 0.69 | 0.48 | 1 |
| fa_20: Ich bin besorgt, dass die Probleme, die mich momentan beschäftigen, noch lange Zeit anhalten werden. | 0.69 | 0.47 | 1 |
| fa_05: Ich habe Angst, die Zukunft zu planen. | 0.68 | 0.46 | 1 |
| fa_28: Ich bin besorgt, dass ich in meinem Beruf künftig nicht anerkannt werde. | 0.65 | 0.43 | 1 |
| fa_06: Ich bin über mögliche Missgeschicke besorgt. | 0.64 | 0.41 | 1 |
| fa_25: Ich bin besorgt, dass andere in der Zukunft eine schlechte Meinung von mir haben werden. | 0.63 | 0.39 | 1 |
| fa_21: Selbst wenn die Dinge gut laufen, wird sich das Schicksal gegen mich wenden. | 0.62 | 0.39 | 1 |
| fa_11: Ich bin mir sicher, dass ich in der Zukunft die wichtigsten Ziele und Werte in meinem Leben erreichen werde. | -0.59 | 0.35 | 1 |
| fa_12: Ich mache mir Sorgen, dass ich meiner Familie keine guten materiellen Bedingungen bieten kann. | 0.55 | 0.31 | 1 |
| fa_16: Ich glaube, dass ich in der Zukunft fähig bin, meine Probleme selbst zu lösen. | -0.55 | 0.3 | 1 |
| fa_01: Meine Zukunft ist ungewiss. | 0.5 | 0.25 | 1 |
| fa_18: Ich bin von dem Gedanken verängstigt, dass das Leben schnell vorübergeht. | 0.47 | 0.22 | 1 |
| fa_04: Ich bin mir sicher, dass ich in der Zukunft nicht allein sein werde oder zurückgewiesen werde. | -0.45 | 0.2 | 1 |
| fa_23: Es ist lebenswert in dieser schönen, sich stetig weiter entwickelnden Welt. | -0.44 | 1 | |
| fa_02: Ich bin besorgt, dass bald eine Katastrophe eintreten wird. | 0.43 | 1 | |
| fa_15: Je näher ich dem Tod komme, desto mehr fürchte ich mich vor ihm. | 0.38 | 1 | |
| fa_17: Ich bin besorgt, dass wirtschaftlich-politische Veränderungen meine Zukunft gefährden. | 0.37 | 1 | |
| fa_29: Ich sorge mich, dass ich im Alter jemandem zur Last fallen werde. | 0.35 | 1 | |
| fa_22: Ich bin von der Möglichkeit eines plötzlichen Unfalls oder einer ernsthaften Krankheit (z.B. AIDS, Krebs) beunruhigt. | 0.34 | 1 | |
| fa_13: Ich habe das Gefühl, dass die Welt auf einen Kollaps, ein apokalyptisches Ende, zusteuert. | 0.32 | 1 | |
| fa_24: Ich bin nicht besorgt, dass die Menschen in der Zukunft „Raubtiere“ zueinander sein werden. | 1 | ||
| Variances | |||
| Eigenvalues | 10.28 | ||
| Explained variance | 0.35 | ||
| Note. Extraction method is minres. Rotation method is oblimin. RMSEA is 0.087 CI90% [0.082, 0.092]. Loadings below |0.2| are not displayed. | |||