График спагетти в R с разным временем измерения

У меня есть матрица данных с именем scores.csv, которая выглядит примерно так:

ID      score   age    

1       23       12  
1       50       16  
2       25       13  
2       67       16

Я использовал следующий код:

scores<-read.table("scores.csv",sep=",", header=T)
interaction.plot(scores$age,scores$id, scores$score, xlab="age",ylab="score", legend=F)

Это отлично работает, если для всех идентификаторов возраст одинаковый (12 и 16 для обоих), однако, как только они различаются, я получаю пустой график спагетти.


r plot
person Bous    schedule 24.11.2015    source источник
comment
Вы открыты для ggplot2?   -  person Matias Andina    schedule 25.11.2015
comment
Я! Я видел реализацию ggplot2, которая просто добавила 0 в качестве начальной точки для каждого идентификатора, но это не совсем то, что я ищу,   -  person Bous    schedule 25.11.2015
comment
Не могли бы вы выложить матрицу или ее часть?   -  person Matias Andina    schedule 25.11.2015
comment
df ‹- data.table(ID=c(1,1,2,2,3,3), Score=c(23,50,25,67,22,55), Age=c(12,16,13) ,16,12,17))   -  person Bous    schedule 25.11.2015
comment
Это все, что я могу вам дать, настоящие данные конфиденциальны.   -  person Bous    schedule 25.11.2015
comment
Даст ли library(lattice); xyplot(Score ~ Age, group=ID, data=df, type="l") вам то, что вы хотите?   -  person ekstroem    schedule 25.11.2015
comment
оно делает! большое спасибо!   -  person Bous    schedule 25.11.2015

Ответы (1)


arrow_upward
0
arrow_downward

Ради интереса, вот с ggplot2

Убедитесь, что вы используете data.frame, а не data.table

library("ggplot2")    
df <- data.frame(ID=c(1,1,2,2,3,3), Score=c(23,50,25,67,22,55), Age=c(12,16,13,16,12,17))
    ggplot(df,aes(x=Age,y=Score,
             group=ID,color=factor(ID)))+
         geom_point()+geom_line()

введите здесь описание изображения

И решетка (экстроем заслуживает похвалы за это)

library(lattice); xyplot(Score ~ Age, group=ID, data=df, type="l")

введите здесь описание изображения 2

Я использовал эстетику по умолчанию для этих графиков, вы можете настроить добавление других параметров.

person Matias Andina    schedule 25.11.2015