Sternzeichen <- structure(list(Glaube = c(2, -1, 1, 2, 2, -1, -1, -2, -2, -1, 1, 0, 1, 2, 1, 2, 2, 1, 1, 0, 1, 2, 2, 1, 2, 0, 1, 1, 2, 0, 2, 1, -2, -1, 2, -2, 1, 2, -2, 0, 2, -1, 0, -2, 2, 1, -2, 1, 1, 1, 2, 2, -1, -1, -2, -1, 1, 2, 1, -2, 0, 1, -2, -2, 2, -1, 0, -2, 0, -2, 2, 1, 0, -2, 1, 1, 1, -1, 2, -2, 1, 1, 1, -1, 1, 2, 2, 2, 1, -2, -2, 2, -2, -1, -2, 0, 0, 2, 1, 2, 1, -2, -2, -2, -2, 1, -2, -1, 2, 1, 2, 0, 1, 1, -1, 1, 1, -2, 0, 1, 1, 2, 0, 0, 0, -2, -2, -1, 1, 1, -2, -2, -2, 2, 1, -2, 1, -2, 1, 2, -2, 1, 1, -1, -2, 0, 1, 0, -2, 0, 2, 0, -1, -1, 1, 2, 0, -1, 0, 2, -1, 1, 2, -1, 1, -2, 0, -1, 0, 1, 1, 0, 1, -1, 0, -1, 1, -1, -2, 1, 1, 0, -1, -1, 1, -2, 2, 1, 2, 1, -1, 0, 2, 2, 1, 0, 2, 0, -2, -2, -2, 0, -1, 1, 2, -1), SternWahr = c(1, -2, -1, 0, 2, -2, 1, -2, -2, -2, 1, -1, 1, -2, 1, -2, -1, 0, -2, -2, -2, 1, 1, -2, 0, -2, -1, 1, -1, 1, 1, -2, -2, -2, -2, -2, -1, 1, -2, -1, 1, 1, 0, 2, -2, 1, -2, -2, -1, 1, 0, -2, -1, -2, -2, -2, -1, -1, -2, -2, 0, -2, 1, -1, 1, -2, 1, -2, -2, -2, -2, -1, -1, 0, -2, -2, 2, -2, -2, -2, -2, 1, 0, 1, -2, -2, -2, 1, 1, -2, -2, -2, -2, -2, -2, -2, -1, -2, -2, 0, -2, -2, -2, 0, 0, 0, -2, -2, -2, -2, -1, 0, 1, 0, -1, -2, -2, -2, 1, 1, -1, 2, -2, -1, -2, -2, -2, 1, -2, -2, -1, -2, -2, -1, -2, -2, -1, 0, 1, -1, -2, -2, -2, -2, -1, -2, -2, -2, -2, -2, -2, -1, -2, -2, 1, -1, -2, -2, 1, 0, 0, -1, -1, 1, 0, -1, -2, -1, 1, -2, 1, -2, -1, -2, -2, -2, 1, -2, 0, -1, 1, -2, -1, -2, 1, -2, -2, -2, -2, -2, -2, -2, 1, 2, -2, -1, 0, -2, -2, -2, -2, 2, 1, -2, -2, -2 )), .Names = c("Glaube", "SternWahr"), row.names = c(NA, 206L ), class = "data.frame", na.action = structure(c(15L, 50L, 75L, 94L, 104L, 128L, 163L, 187L), .Names = c("15", "50", "75", "94", "104", "128", "163", "187"), class = "omit"))