다중 플롯

Question

나는 다음과 같은 데이터가 있습니다

Animal MY Age 
1 17.03672067 1 
1 17.00833641 2 
1 16.97995215 3 
1 16.95156788 4 
1 16.92318362 5 
1 16.88157748 6 
2 16.83997133 2 
2 16.79836519 3 
2 16.75675905 4 
2 16.7151529 5 
2 16.67354676 6 
2 16.63194062 7 
3 16.59033447 1 
3 16.54872833 2 
3 16.50712219 3 
3 16.46551604 4 
3 16.4239099 5 
3 16.38230376 6 
4 16.34069761 1 
4 16.29909147 2 
4 16.25748533 3 
4 16.21587918 4 
4 16.17427304 5 
4 16.1326669 6 

내가 각 동물 연령 대 MY 사이에 분산 플롯을 플롯 할을. lines : 지금 다른 동물에 대한 동일한 플롯 (MY 대 나이)를 추가하려면 난 그냥 기능을 사용할 필요가,이 기능을

plot(memo$MY[memo$Animal=="1223100747"]~memo$Age[memo$Animal=="1223100747"]). 

를 사용합니다. 그러나 나는 약 200 마리의 동물을 가지고 있기 때문에 이것을 수동으로 100 번하고 싶지는 않습니다. 내가 대신 당신은 예를 들어 by을 사용할 수 있습니다 푸옹

Answer 1

lines, lines .... lines)

안부, 를 사용하는?, 하나의 함수에 의해이 다른 동물을 그릴 수있는 방법 : 내 질문이다

by(memo,memo$Animal,FUN=function(x) plot(x$MY~x$Age)) 

Answer 2

기본 R을 사용하려면 루프 또는 매트 플롯을 사용할 수 있지만 ggplot2 패키지를 사용하는 것이 좋습니다.

DF <- read.table(text="Animal MY Age 
1 17.03672067 1 
1 17.00833641 2 
1 16.97995215 3 
1 16.95156788 4 
1 16.92318362 5 
1 16.88157748 6 
2 16.83997133 2 
2 16.79836519 3 
2 16.75675905 4 
2 16.7151529 5 
2 16.67354676 6 
2 16.63194062 7 
3 16.59033447 1 
3 16.54872833 2 
3 16.50712219 3 
3 16.46551604 4 
3 16.4239099 5 
3 16.38230376 6 
4 16.34069761 1 
4 16.29909147 2 
4 16.25748533 3 
4 16.21587918 4 
4 16.17427304 5 
4 16.1326669 6",header=TRUE) 

library(ggplot2) 
DF$Animal <- factor(DF$Animal) 

p1 <- ggplot(DF,aes(x=MY,y=Age,colour=Animal)) + geom_line() 
print(p1)