Apanhei muito, mas era uma besteira...
f = read.table(file="C:\\Downloads\\fair.txt",
sep=";",
header=FALSE,
skip = 0,
dec=".",
row.names = NULL,
colClasses <- rep("numeric",3),
comment.char = "#",
na.strings = c("*", "-",-99.9, -999.9),
col.names <- c("tempo", "taxa") )
plot(taxa~tempo, f, col=4, ylim = c(0, 6), type=c("s"), xlab="Execution Time (minutes)", ylab="Workload (httperf rate)", main="Workload at Time", lwd=3, xaxs="i", yaxs="i", font.axis=2, font.lab=2)
amigo gostaria de saber como fazer este gráfico! Gostaria de saber como é a tabela de entrada de dados
ResponderExcluiro degrau é feito só pela função type c = s de plot !!!!!
ResponderExcluirf = read.table(file="C:\\workload.txt",sep=";", header=FALSE)
plot(V2~V1, f, col=4, type=c("s"), xlab="Execution Time (minutes)", ylab="Workload (httperf rate)", main="Workload at Time", lwd=3, xaxs="r", yaxs="r", font.axis=2, font.lab=2)
workload.txt
1;16
2;16
3;16
4;16
5;16
6;30
7;30
8;30
9;30
10;30
11;50
12;50
13;50
14;50
15;50
16;30
17;30
18;30
19;30
20;30
21;16
22;16
23;16
24;16
25;16
26;60
27;60
28;60
29;60
30;60
31;80
32;80
33;80
34;80
35;80
36;100
37;100
38;100
39;100
40;100
41;130
42;130
43;130
44;130
45;130
46;16
47;16
48;16
49;16
50;16
51;50
52;50
53;50
54;50
55;50
56;10
57;10
58;10
59;10
60;10