R-FORUM.DE

[phbe]

Hallo,
ich bräuchte Hilfe bei einer Faktorenanalyse in R.
Ich habe einen Datensatz mit 61 Fällen und 32 Variablen die jeweils binär codiert sind (1/0).
Um damit eine Faktorenanalyse rechnen zu können, brauche ich die tetrachorischen Korrelationskoeffizienten.
Um eine Matrix mit diesen Koeffizienten zu bekommen, habe ich zunächst die Daten aus einer sav-Datei importiert und dann die Ausprägungen von numeric in factor umgewandelt.
Dann habe ich mit dem Paket "polycor" versucht, eben diese Koeffizienten zu berechnen. Leider bekomme ich aber immer folgende Fehlermeldung:

> install.packages("polycor")
versuche URL 'https://cran.uni-muenster.de/bin/macosx/mavericks/contrib/3.2/polycor_0.7-8.tgz'
Content type 'application/x-gzip' length 31503 bytes (30 KB)
==================================================
downloaded 30 KB


Die heruntergeladenen Binärpakete sind in
/var/folders/cm/kc0qj29j0wz3dwp2j1dkrbqm0000gn/T//RtmpArjghh/downloaded_packages
> library(polycor)
Lade nötiges Paket: mvtnorm
Lade nötiges Paket: sfsmisc
> het.mat <- hetcor(df.3)$cor
Fehler in optim(0, f, control = control, hessian = TRUE, method = "BFGS") :
non-finite finite-difference value [1]
Zusätzlich: Es gab 23 Warnungen (Anzeige mit warnings())

Ich habe mich dabei an folgende Anleitung gehalten: http://www.unt.edu/rss/class/Jon/Benchm ... ep2014.pdf

die warnings sind folgende:

> warnings()
Warnmeldungen:
1: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
2: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
3: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
4: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
5: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
6: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
7: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
8: In log(P) : NaNs wurden erzeugt
9: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
10: In sqrt(result$var[1, 1]) : NaNs wurden erzeugt
11: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
12: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
13: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
14: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
15: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
16: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
17: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
18: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
19: In polychor(x, y, ML = ML, std.err = std.err) :
4 columns with zero marginals removed
20: In log(P) : NaNs wurden erzeugt
21: In log(P) : NaNs wurden erzeugt
22: In log(P) : NaNs wurden erzeugt
23: In log(P) : NaNs wurden erzeugt

Kann mir jemand sagen, wo das Problem liegt?

Vielen Dank und beste Grüße
phbe