Wessa.net

Send output to:

Data X:
0.5 0.47 0.46 0.47 0.43 0.47 0.48 0.6 0.53 0.47 0.58 0.53 0.56 0.48 0.52 0.53 0.59 0.52 0.55 0.54 0.56 0.62 0.46 0.53 0.55 0.54 0.58 0.53 0.5 0.43 0.55 0.42 0.49 0.49 0.67 0.54 0.55 0.52 0.75 0.65 0.43 0.66 0.62 0.47 0.53 0.6 0.66 0.47 0.67 0.4 0.62 0.34 0.65 0.39 0.54 0.57 0.5 0.46 0.49 0.55 0.53 0.5 0.54 0.43 0.49 0.44 0.55 0.5 0.56 0.38 0.55 0.58 0.62 0.49 0.58 0.44 0.58 0.51 0.55 0.32 0.66 0.53 0.45 0.54 0.5 0.57 0.48 0.53 0.59 0.48 0.45 0.56 0.54 0.48 0.43 0.49 0.61 0.59 0.53 0.63 0.46 0.54 0.62 0.56 0.59 0.55 0.39 0.42 0.57 0.58 0.51 0.43 0.5 0.57 0.49 0.55 0.61 0.48 0.66 0.53 0.52 0.58 0.58 0.6 0.56 0.59 0.71 0.47 0.52 0.65 0.56 0.52 0.71 0.47 0.51 0.53 0.51 0.45 0.52 0.43 0.5 0.49 0.59 0.54 0.47 0.5 0.52 0.66 0.51 0.59 0.57 0.5 0.57 0.62 0.59 0.47 0.65 0.49 0.56 0.46 0.49 0.54 0.52 0.51 0.47 0.47 0.51 0.51 0.5 0.56 0.52 0.47 0.45 0.53 0.52 0.5 0.51 0.57 0.62 0.54 0.6 0.47 0.49 0.51 0.52 0.48 0.57 0.54 0.49 0.4 0.33 0.5 0.41 0.45 0.41 0.44 0.5 0.44 0.39 0.4 0.54 0.55 0.46 0.43 0.45 0.42 0.44 0.46 0.41 0.42 0.52 0.53 0.45 0.46 0.67 0.49 0.47 0.46 0.46 0.52 0.39 0.46 0.48 0.56 0.5 0.51 0.56 0.61 0.54 0.42 0.55 0.62 0.44 0.46 0.66 0.56 0.39 0.48 0.42 0.62 0.37 0.45 0.44 0.53 0.45 0.57 0.55 0.52 0.53 0.53 0.61 0.49 0.5 0.5 0.58 0.47 0.56 0.41 0.63 0.62 0.57 0.58 0.46 0.52 0.8 0.46 0.59 0.41 0.72 0.64 0.42 0.48 0.51 0.44 0.34 0.5 0.55 0.6 0.44 0.5 0.5 0.56 0.66 0.49 0.5 0.53 0.58 0.51 0.56 0.6 0.51 0.49 0.51 0.57 0.4 0.65 0.61 0.47 0.25 0.56 0.46 0.47 0.48 0.47 0.46 0.39 0.42 0.44 0.5 0.5 0.43 0.37 0.68 0.51 0.41 0.52 0.33 0.44 0.62 0.61 0.57 0.49 0.57 0.49 0.44 0.35 0.45 0.52 0.48 0.34 0.48 0.45 0.46 0.53 0.34 0.5 0.5 0.43 0.41 0.45 0.55 0.6 0.35 0.48 0.43 0.37 0.55 0.68 0.51 0.68 0.39 0.52 0.57 0.5 0.57 0.42 0.49 0.5 0.54 0.58 0.44 0.51 0.57 0.57 0.5 0.69 0.6 0.47 0.43 0.63 0.69 0.54 0.65 0.48 0.54 0.42 0.57 0.27 0.48 0.34 0.44 0.51 0.42 0.41 0.49 0.57 0.45 0.59 0.5 0.63 0.59 0.31 0.5 0.53 0.46 0.63 0.55 0.42 0.47 0.43 0.62 0.62 0.5 0.94 0.56 0.47 0.38 0.62 0.39 0.4 0.43 0.43 0.55 0.38 0.37 0.47 0.32 0.55 0.4 0.47 0.5 0.38 0.39 0.55 0.58 0.54 0.23 0.37 0.53 0.43 0.44 0.58 0.41 0.53 0.45 0.41 0.44 0.5 0.38 0.58 0.56 0.38 0.42 0.49 0.45 0.53 0.54 0.62 0.5 0.4 0.51 0.53 0.48 0.64 0.49 0.5 0.73 0.55 0.48 0.48 0.47 0.42 0.47 0.41 0.43 0.46 0.56 0.54 0.43 0.49 0.59 0.4 0.57 0.37 0.61 0.6 0.5 0.5 0.48 0.6 0.79 0.52 0.56 0.58 0.48 0.39 0.45 0.4 0.38 0.37 0.29 0.38 0.4 0.54 0.34 0.42 0.44 0.48 0.65 0.37 0.45 0.45 0.49 0.5 0.5 0.7 0.44 0.4 0.55 0.5 0.32 0.3 0.46 0.46 0.34 0.51 0.54 0.53 0.41 0.53 0.59 0.44 0.54 0.4 0.67 0.52 0.31 0.58 0.42 0.47 0.52 0.3 0.5 0.37 0.52 0.47 0.55 0.45 0.68 0.29 0.44 0.53 0.42 0.46 0.48 0.53 0.51 0.58 0.61 0.48 0.49 0.56 0.57 0.46 0.53 0.46 0.52 0.4 0.56 0.63 0.5 0.39 0.64 0.43 0.62 0.39 0.64 0.38 0.33 0.56 0.38 0.35 0.35 0.49 0.48 0.52 0.2 0.51 0.38 0.63 0.35 0.57 0.77 0.36 0.21 0.6 0.48 0.61 0.5 0.5 0.52 0.5 0.71 0.7 0.54 0.6 0.42 0.44 0.44 0.51 0.48 0.47 0.58 0.54 0.49 0.39 0.45 0.52 0.38 0.63 0.51 0.48 0.45 0.53 0.36 0.5 0.5 0.63 0.33 0.38 0.27 0.47 0.38 0.49 0.41 0.48 0.44 0.52 0.55 0.38 0.41 0.43 0.43 0.32 0.46 0.38 0.47 0.5 0.44 0.5 0.45 0.57 0.48 0.38 0.5 0.6 0.17 0.61 0.45 0.66 0.45 0.45 0.29 0.54 0.43 0.54 0.63 0.59 0.6 0.51 0.49 0.58 0.5 0.57 0.27 0.42 0.68 0.55 0.38 0.5 0.67 0.4 0.5 0.33 0.28 0.46 0.35 0.68 0.61 0.53 0.51 0.46 0.33 0.55 0.28 0.35 0.43 0.32 0.43 0.06 0.56 0.45 0.52 0.7 0.32 0.61 0.29 0.63 0.83 0.68 0.5 0.53 0.42 0.61 0.34 0.58 0.49 0.46 0.51 0.51 0.56 0.36 0.39 0.51 0.61 0.73 0.44 0.42 0.52 0.61 0.54 0.71 0.36 0.3 0.73 0.39 0.72 0.47 0.5
Names of X columns:
Tempo Mage Midrange Hunter Zoo Warlock Dragon Warrior Aggro Shaman Token Druid Midrange Shaman Control Priest Secret Hunter CThun Warrior Miracle Rogue Control Warrior Control Paladin Hybrid Hunter Reno Warlock Combo Warrior Beast Druid CThun Druid Deathrattle Rogue Anyfin Paladin Aggro Paladin Freeze Mage Evolve Shaman Tempo Warrior Pirate Warrior Control Shaman Secret Paladin
Number of Factors


Chart options



R Code
par1 <- '2' library(psych) par1 <- as.numeric(par1) x <- t(x) nrows <- length(x[,1]) ncols <- length(x[1,]) y <- array(as.double(x[1:nrows,2:ncols]),dim=c(nrows,ncols-1)) colnames(y) <- colnames(x)[2:ncols] rownames(y) <- x[,1] y fit <- principal(y, nfactors=par1, rotate='varimax') fit fs <- factor.scores(y,fit) fs bitmap(file='test2.png') plot(fs$scores,pch=20) text(fs$scores,labels=rownames(y),pos=3) dev.off() load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Rotated Factor Loadings',par1+1,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Variables',1,TRUE) for (i in 1:par1) { a<-table.element(a,paste('Factor',i,sep=''),1,TRUE) } a<-table.row.end(a) for (j in 1:length(fit$loadings[,1])) { a<-table.row.start(a) a<-table.element(a,rownames(fit$loadings)[j],header=TRUE) for (i in 1:par1) { a<-table.element(a,round(fit$loadings[j,i],3)) } a<-table.row.end(a) } a<-table.end(a) table.save(a,file='mytable.tab')

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	0 seconds
R Server	Big Analytics Cloud Computing Center
R Engine error message	Error in array(list(0.5, 0.47, 0.46, 0.47, 0.43, 0.47, 0.48, 0.6, 0.53, : length of 'dimnames' [1] not equal to array extent Execution halted