]> git.donarmstrong.com Git - wannabuild.git/blobdiff - etc/graph.R
catch-up commit
[wannabuild.git] / etc / graph.R
index e7c1ab6221af82a9ec4d6a68560c86a472b961ae..a530a2842e21e3381a90d7b498f7a7cbc3bd5009 100644 (file)
@@ -1,4 +1,4 @@
-arch <- c("alpha", "amd64", "arm", "armel", "hppa", "i386", "ia64", "mips",
+arch <- c("alpha", "amd64", "armel", "hppa", "i386", "ia64", "mips",
        "mipsel", "powerpc", "s390", "sparc")
 palette(c("black", "turquoise", "red", "OrangeRed", "green3", "cyan", "magenta",
        "violetred2","thistle4", "steelblue2", "springgreen4",
@@ -6,7 +6,7 @@ palette(c("black", "turquoise", "red", "OrangeRed", "green3", "cyan", "magenta",
 
 readdata <- function (file,start) {
        t <- read.table(file,row.names=1,header=FALSE,
-       sep=",",col.names=c("date","alpha","at","hppa","ht","hurd-i386",
+       sep=",",col.names=c("date","alpha","at","arm","art","hppa","ht","hurd-i386",
        "hit","i386","it","ia64","i6t","m68k","mt","mips","mit","mipsel","mipt",
        "powerpc","pt","s390","st","amd64","amdt","sparc","spt","armel","aret"))
        ts(as.matrix(data.frame(t[1]/t[2]*100,t[23]/t[24]*100,