Funkcija plot ne uzima u obzir vrstu parcele na R jeziku

Imam sljedeću R skriptu:

X <- read.table("/tmp/run178/data/monitor/portal_free_heap_monitor.log", header=T, sep=";")

P1 <- subset(X, Server=="PortalServer1")
P2 <- subset(X, Server=="PortalServer2")

png("mygraph.png")
plot(P1$Time, P1$HeapFreePercent, type="l", col="red")
lines(P2$Time, P2$HeapFreePercent, col="green")
q()

U rezultirajućim PNG podacima podaci za" PortalServer1 "crtaju se točkama i crnom bojom, ali bi trebali biti nacrtani crvenim linijama. Druga je nacrtana očekivano zelenim linijama. Što radim pogrešno?

UREDI : Evo strukture X:

> str(X)
'data.frame':   5274 obs. of  3 variables:
 $ Time           : Factor w/ 2654 levels "2011.08.24 14:39:29",..: 1 1 2 2 3 3 4 4 5 5 ...
 $ Server         : Factor w/ 2 levels "PortalServer1",..: 1 2 1 2 1 2 1 2 1 2 ...
 $ HeapFreePercent: int  42 49 41 49 41 49 41 49 41 49 ...