2014-09-27 73 views
-5

我的數據的樣子,情節的多個列中的R

主機名,IOPS,PORT_NO中,tag1,TAG2,時間戳(epochTime)

Hostx,12,ab1,tag1,tag2,ts1 
Hostx,20,ab1,tag1,tag2,ts2 
Hostx,100,ab1,tag1,tag2,ts3 
Hostx,32,abcd,tag1,tag2,ts1 
Hostx,52,abcd,tag1,tag2,ts2 
Hostx,62,abcd,tag1,tag2,ts3 

我要繪製在y軸上的IOPS,時間戳軸,& port_No線(不同的顏色)。 也將紀元時間轉換爲當前日期。

感謝

+0

你或許應該開始與'read.csv' – 2014-09-27 14:54:59

回答

1

以下工作:

> 
> ddf 
    HostName iops port_No tag1 tag2 timestamp 
1 Hostx 12  ab1 tag1 tag2  ts1 
2 Hostx 20  ab1 tag1 tag2  ts2 
3 Hostx 100  ab1 tag1 tag2  ts3 
4 Hostx 32 abcd tag1 tag2  ts1 
5 Hostx 52 abcd tag1 tag2  ts2 
6 Hostx 62 abcd tag1 tag2  ts3 
> 
> 
> dput(ddf) 
structure(list(HostName = structure(c(1L, 1L, 1L, 1L, 1L, 1L), .Label = "Hostx", class = "factor"), 
    iops = c(12L, 20L, 100L, 32L, 52L, 62L), port_No = structure(c(1L, 
    1L, 1L, 2L, 2L, 2L), .Label = c("ab1", "abcd"), class = "factor"), 
    tag1 = structure(c(1L, 1L, 1L, 1L, 1L, 1L), .Label = "tag1", class = "factor"), 
    tag2 = structure(c(1L, 1L, 1L, 1L, 1L, 1L), .Label = "tag2", class = "factor"), 
    timestamp = structure(c(1L, 2L, 3L, 1L, 2L, 3L), .Label = c("ts1", 
    "ts2", "ts3"), class = "factor")), .Names = c("HostName", 
"iops", "port_No", "tag1", "tag2", "timestamp"), class = "data.frame", row.names = c(NA, 
-6L)) 
> 
> ggplot(ddf,aes(y=iops, x=timestamp, group=port_No, color=port_No))+ geom_line() 
> 

enter image description here

+0

謝謝,這是我一直在尋找。 我正在使用read.csv(),能夠繪製2列,但不是第3列。 R> read.csv(file.choose(),header = TRUE) - > demo&ggplot(demo,aes(y = iops,x = ts,group = port_No,color = port_No))+ geom_line() – neeraj 2014-09-27 18:35:38