Wessa.net

Send output to:

Data X:
100286 5223 7415390 7415390 6100 60000 85900000 41120000 0 0 0 0 8 0 84.1 3132.1 4940 0 4248 266.64 2 0 0 50 100 257803 6032 2877819 6530010 10551 400000 1500000000 150000000 7 3 0 0 0 0 1631.5 1070.1 2050 0 0 0 0 0 131 0 0 1508933 11678 14914411 14914411 10215.35 1353000 1829050000 177610000 0 1 0 0 0 0 1912.2 370.3 35770 84431 590 201.97 1221 350 112 8000 4100 2521938 9137 2617000 1178000 6210 1947101 1123355000 272239000 0 2 0 0 0 2 1435.5 578.5 61660 10484 1970 820.44 1364 0 78 0 0 1440034 5455 6199500 6199500 4133.36 729747 530850298 115980082 1 2 0 0 0 1 1375.2 681.7 61660 10484 1970 820.44 1364 0 78 0 0 2736827 12040 3361952 3361952 18121 1312220 1758520928 251698233 6 3 0 0 0 1 1477.4 412.2 64320 45394 3314 786.46 1887 1250 287 200 8100 1618879 10158 2296601 1756777 6532 4932379 6450300000 333900000 0 5 0 0 0 4 1296.8 1506 2810 0 971 578.28 3172 300 45 0 0 1800000 12764 2330642 2330642 4453 1120183 645733071 96913184 0 1 0 1 0 0 1709.2 1019.2 22830 0 664 460.75 1617 1250 176 0 0 3250000 9906 9740000 1558400 7482 2024607 1725245000 213853000 0 1 0 0 0 0 1864.8 757.9 22830 0 664 460.75 1617 1250 176 0 0 1147000 10061 14060000 14060000 29834.78 1625136 529471600 75077075 2 1 0 0 0 8 1329.5 1333.4 100 0 0 0 0 0 0 0 0 515215 3282 1258000 314000 787.54 241175 466314000 173468000 0 1 0 0 0 2 1435.5 578.5 61660 10484 1970 820.44 1364 0 78 0 0 803983 412 6950000 6950000 5290 411000 1016000000 87000000 0 0 0 0 9 5 852 1416.8 16800 0 17998 1644.31 24 0 5 0 0 60692 757 283667 280650 1450 27599 6085412 1217082.4 2 1 0 0 0 0 1624.8 317.9 18270 77 0 1098.2 236 0 24 0 0 410000 60 1095000 1095000 1823.03 426669 553536000 90979000 0 2 0 0 0 0 1296.8 1506 4560 0 64 107.4 1333 350 24 0 0 306020 12831 295000 295000 520 101319 434206127 24579112 3 2 0 0 0 1 1906.3 134.5 20410 4244 0 102.25 0 0 0 0 0 2542600 14365 3378495 3378495 13904.34 3368966.18 3015270000 319570000 0 4 0 0 5 2 1130.1 371.6 64320 45394 3314 786.46 1887 1250 287 200 8100 4296699 12935 8748494 8748494 30724 6328071 4415552452 324858127 0 4 0 0 2 9 1130.1 371.6 64320 45394 3314 786.46 1887 1250 287 200 8100 2364866 18442 1442665 5902251 22448 1737517.552 751920000 283865539 3 2 1 0 0 8 2039.8 15.4 64320 45394 3314 786.46 1887 1250 287 200 8100 7523337 17660 8630080 3610017 26641 14109096 6098688629 460178575 3 0 0 1 0 0 2234 5 17670 33800 1693 604.46 1070 450 151 230 10600 1260419 3843 570000 570000 3880 1225425.38 92836031 170000 0 0 0 0 0 3 1359.4 518.5 13760 0 650 201.99 212 0 8 0 0 550428 4156 464748 464748 4906 853181 91252724 816514 1 0 0 0 0 2 1642.1 2.9 24700 55857 6459 3726.49 1131 450 0 100 6100 244000 12539 2583748 2583748 2325.5 1267410 2020120000 262615600 1 9 0 1 0 0 2034.9 6.8 50 153 0 0 0 0 3 0 0 939690 10288 1718111.52 1718777.52 1498 607832.98 910033637.5 99646243 3 1 0 0 6 3 2367.5 8.8 17670 33800 1693 604.46 1070 450 151 230 10600 1059313 6334 2471608.5 2471608.5 1792 681108 4797288631 561282770 0 12 0 0 0 3 2367.5 8.8 17670 33800 1693 604.46 1070 450 151 230 10600 474838 4370 1578450 1578450 523 441350 372420000 37242000 4 0 0 1 3 1 2508 0 17670 33800 1693 604.46 1070 450 151 230 10600 1020000 6401 61693 61693 1457 388000 137400000 600000 0 3 0 0 3 19 1537.3 44.5 17670 33800 1693 604.46 1070 450 151 230 10600 569167 6474 345847 345847 610 570430 491384652 73707698 0 2 0 0 0 0 2369.4 12.7 17670 33800 1693 604.46 1070 450 151 230 10600 107418 497 20400 20400 1400 57437 22290000 1650000 4 0 0 0 1 2 2075.3 26.1 38440 44229 2341 409.32 578 300 123 100 6900 166028 3255 4686000 4686000 3124 52640 148314936 8335435.68 0 0 0 0 1 1 930.7 765 8650 0 50064 2064.92 8 0 0 0 0 140747 41.22 8000000 8000000 11650 160948 20000000 4000000 0 1 0 0 0 0 1609.5 4.1 100 8 0 7.27 0 0 0 0 0 411686 15003 171101.47 171101.47 10287.575 598754 48774000 1541746.14 0 5 0 0 0 0 1340.3 103 38440 44229 2341 409.32 578 300 123 0 0 23991 1347 914014 914014 11298 42636 25519273 1387147 0 1 0 0 0 0 1640.2 191.2 50 0 0 0 0 0 0 0 0 583232 7563 99285 1802009 2302 371714 122057000 11972915 0 4 0 0 0 8 1035.6 155.3 24700 55857 6459 3726.49 1131 450 0 100 6100 11210 2656 275432 355573 760 16940 11663531 816447.17 0 0 0 0 0 0 2236.2 0 50 8 0 0 0 0 0 50 100 293416 82 0 9371293 0 198161 222896688 128499998 0 0 0 0 0 1 0 790 9090 0 2131 168.9 1 0 2 0 0 12190 1705 165240 4402240 85 7000 8474000 2500000 0 0 0 0 8 0 0 2000 4940 0 4248 266.64 2 0 0 0 0 546978 4994 2788000 2788000 3810 201270 741670000 103830000 2 1 0 0 7 13 2367.5 8.8 17670 33800 1693 604.46 1070 450 151 230 10600 222619 6128 14433322 14578652 18558 87316 169005104 23491709 1 9 0 0 0 0 2367.5 8.8 17670 33800 1693 604.46 1070 450 151 230 10600 13000000 15294 990000 1290690000 1094.4 17522706.46 6642740000 1052620000 1 0 0 0 0 1 893.2 313.7 24700 55857 6459 3726.49 1131 450 0 100 6100 2000000 12504 4239335 4239335 43719.3 1594350.74 1535731711 73750000 3 12 0 1 0 4 2131.2 291 35770 84431 590 201.97 1221 350 112 8000 4100 1772118 6625 2838000 2838000 24354.4 1356960 1518600000 212000000 6 6 0 1 2 2 1068.8 417.5 64320 45394 3314 786.46 1887 1250 287 0 0 6637995 20330 28724340 617102035 27465 4540422 7837649711 157733431 8 7 0 1 0 3 1908.7 165.1 35770 84431 590 201.97 1221 350 112 8000 4100 542321 6198 6459624 1434502 3687 404880 528420000 59220000 0 0 0 0 0 0 1824.7 761 142310 18770 483 51.67 1039 0 62 0 0 109347 16543 83458 83458 126 67074 75320000 7300000 0 3 0 0 0 3 2131.2 291 2810 84431 590 201.97 1221 350 112 8000 4100 515177 8037 408432 408432 4354.4 708196 872815000 66302000 0 0 0 0 0 0 1441.4 864.9 142310 18770 483 51.67 1039 0 62 0 0
Names of X columns:
Population Density Cumulative energy generated from all grid connected renewable energy sources within the city (KWH) Cumulative energy supplied from all grid connected renewable energy sources to the city (KWH) Cumulative installed capacity from renewable energy sources for self consumption (KW) Total connected load in the city (KW) Total energy consumption in the city (KWH) Total number of units lost due to AT&C loss (KWH) Less than or equal to 50 KM aerial Distance Greater than 50KM and Less than or equal to 125 KM aerial Distance Less than or equal to 50 KM aerial Distance Greater than 50KM and Less than or equal to 125 KM aerial Distance Less than or equal to 50 KM aerial Distance Greater than 50KM and Less than or equal to 125 KM aerial Distance Cooling Degree Days Heating Degree Days Solar Potential (MWp) Wind Potential (MWp) @100m Large Hydro Poptential Small Hydro Potential Biomass Potential Cogeneratiion-Baggasse Waste To Energy Tidal Wave
Method


# of (top) clusters to display


Horizontal


Triangle


Chart options


Title:
Label y-axis:
Label x-axis:

R Code
par3 <- as.logical(par3) par4 <- as.logical(par4) if (par3 == 'TRUE'){ dum = xlab xlab = ylab ylab = dum } x <- t(y) hc <- hclust(dist(x),method=par1) d <- as.dendrogram(hc) str(d) mysub <- paste('Method: ',par1) bitmap(file='test1.png') if (par4 == 'TRUE'){ plot(d,main=main,ylab=ylab,xlab=xlab,horiz=par3, nodePar=list(pch = c(1,NA), cex=0.8, lab.cex = 0.8),type='t',center=T, sub=mysub) } else { plot(d,main=main,ylab=ylab,xlab=xlab,horiz=par3, nodePar=list(pch = c(1,NA), cex=0.8, lab.cex = 0.8), sub=mysub) } dev.off() if (par2 != 'ALL'){ if (par3 == 'TRUE'){ ylab = 'cluster' } else { xlab = 'cluster' } par2 <- as.numeric(par2) memb <- cutree(hc, k = par2) cent <- NULL for(k in 1:par2){ cent <- rbind(cent, colMeans(x[memb == k, , drop = FALSE])) } hc1 <- hclust(dist(cent),method=par1, members = table(memb)) de <- as.dendrogram(hc1) bitmap(file='test2.png') if (par4 == 'TRUE'){ plot(de,main=main,ylab=ylab,xlab=xlab,horiz=par3, nodePar=list(pch = c(1,NA), cex=0.8, lab.cex = 0.8),type='t',center=T, sub=mysub) } else { plot(de,main=main,ylab=ylab,xlab=xlab,horiz=par3, nodePar=list(pch = c(1,NA), cex=0.8, lab.cex = 0.8), sub=mysub) } dev.off() str(de) } load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Summary of Dendrogram',2,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Label',header=TRUE) a<-table.element(a,'Height',header=TRUE) a<-table.row.end(a) num <- length(x[,1])-1 for (i in 1:num) { a<-table.row.start(a) a<-table.element(a,hc$labels[i]) a<-table.element(a,hc$height[i]) a<-table.row.end(a) } a<-table.end(a) table.save(a,file='mytable1.tab') if (par2 != 'ALL'){ a<-table.start() a<-table.row.start(a) a<-table.element(a,'Summary of Cut Dendrogram',2,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Label',header=TRUE) a<-table.element(a,'Height',header=TRUE) a<-table.row.end(a) num <- par2-1 for (i in 1:num) { a<-table.row.start(a) a<-table.element(a,i) a<-table.element(a,hc1$height[i]) a<-table.row.end(a) } a<-table.end(a) table.save(a,file='mytable2.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 Framework error message	The field 'Names of X columns' contains a hard return which cannot be interpreted. Please, resubmit your request without hard returns in the 'Names of X columns'.
R Engine error message	Error in array(list(100286, 5223, 7415390, 7415390, 6100, 60000, 85900000, : length of 'dimnames' [1] not equal to array extent Execution halted