Home » date » 2008 » Nov » 10 »

hierarchisch

*The author of this computation has been verified*
R Software Module: rwasp_hierarchicalclustering.wasp (opens new window with default values)
Title produced by software: Hierarchical Clustering
Date of computation: Mon, 10 Nov 2008 11:31:19 -0700
 
Cite this page as follows:
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2008/Nov/10/t1226341954cdtyziede3rm7ky.htm/, Retrieved Mon, 10 Nov 2008 18:32:34 +0000
 
BibTeX entries for LaTeX users:
@Manual{KEY,
    author = {{YOUR NAME}},
    publisher = {Office for Research Development and Education},
    title = {Statistical Computations at FreeStatistics.org, URL http://www.freestatistics.org/blog/date/2008/Nov/10/t1226341954cdtyziede3rm7ky.htm/},
    year = {2008},
}
@Manual{R,
    title = {R: A Language and Environment for Statistical Computing},
    author = {{R Development Core Team}},
    organization = {R Foundation for Statistical Computing},
    address = {Vienna, Austria},
    year = {2008},
    note = {{ISBN} 3-900051-07-0},
    url = {http://www.R-project.org},
}
 
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
 
Feedback Forum:

Post a new message
 
Original text written by user:
 
IsPrivate?
No (this computation is public)
 
User-defined keywords:
 
Dataseries X:
» Textbox « » Textfile « » CSV «
5.6 8.9 3.4 11 5.6 8.9 3 5 5.5 8.5 3.1 6 5.4 8.1 2.5 2 5.4 7.5 2.2 7 5.4 7.1 2.3 18 5.5 6.9 2.1 19 5.7 7.1 2.8 25 5.7 7 3.1 28 5.4 6.7 2.9 26 5.6 7 2.6 27 5.8 7.3 2.7 35 6.1 7.7 2.3 43 6.8 8.4 2.3 63 6.7 8.4 2.1 80 6.7 8.8 2.2 56 6.4 9.1 2.9 48 6.3 9 2.6 43 6.3 8.6 2.7 43 6.4 7.9 1.8 42 6.3 7.7 1.3 42 6 7.8 0.9 44 6.2 9.1 1.3 52 6.3 9.4 1.3 47 6.6 9.3 1.3 47 7.5 8.7 1.3 47 7.8 8.4 1.1 49 7.9 8.6 1.4 58 7.8 9 1.2 60 7.6 9.1 1.7 65 7.5 8.7 1.8 70 7.6 8.2 1.5 63 7.5 7.9 1 64 7.3 7.9 1.6 64 7.6 9.1 1.5 69 7.5 9.4 1.8 62 7.6 9.5 1.8 56 7.9 9.1 1.6 77 7.9 9 1.9 62 8.1 9.3 1.7 59 8.2 9.9 1.6 53 8 9.8 1.3 52 7.5 9.4 1.1 54 6.8 8.3 1.9 57 6.5 8 2.6 58 6.6 8.5 2.3 48 7.6 10.4 2.4 51 8 11.1 2.2 48 8 10.9 2 50 7.7 9.9 2.9 59 7.5 9.2 2.6 58 7.6 9.2 2.3 59 7.7 9.5 2.3 58 7.9 9.6 2.6 57 7.8 9.5 3.1 52 7.5 9.1 2.8 52 7.5 8.9 2.5 64 7.1 9 2.9 63 7.5 10.1 3.1 62 7.5 10.3 3.1 58 7.6 10.2 3.2 57 7.7 9.6 2.5 55 7.7 9.2 2.6 57 7.9 9.3 2.9 53 8.1 9.4 2.6 44 8.2 9.4 2.4 44 8.2 9.2 1.7 51 8.1 9 2 45 7.9 9 2.2 48 7.3 9 1.9 44 6.9 9.8 1.6 45 6.6 10 1.6 36 6.7 9.9 1.2 37 6.9 9.3 1.2 31 7 9 1.5 32 7.1 9 1.6 59 7.2 9.1 1.7 39 7.1 9.1 1.8 34 6.9 9.1 1.8 35 7 9.2 1.8 27 6.8 8.8 1.3 32 6.4 8.3 1.3 32 6.7 8.4 1.4 34 6.7 8.1 1.1 29 6.4 7.8 1.5 28 6.3 7.9 2.2 24 6.2 7.9 2.9 27 6.5 8 3.1 23 6.8 7.9 3.5 25 6.8 7.5 3.6 20 6.5 7.2 4.4 18 6.3 6.9 4.2 26 5.9 6.6 5.2 31 5.9 6.7 5.8 29
 
Output produced by software:

Enter (or paste) a matrix (table) containing all data (time) series. Every column represents a different variable and must be delimited by a space or Tab. Every row represents a period in time (or category) and must be delimited by hard returns. The easiest way to enter data is to copy and paste a block of spreadsheet cells. Please, do not use commas or spaces to seperate groups of digits!


Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time4 seconds
R Server'Herman Ole Andreas Wold' @ 193.190.124.10:1001


Summary of Dendrogram
LabelHeight
10.223606797749979
20.316227766016838
30.346410161513775
40.412310562561766
50.447213595499958
60.469041575982344
70.547722557505166
80.574456264653803
90.58309518948453
100.632455532033676
110.705252728096028
120.787400787401181
130.769142270551173
140.851611783716754
150.871779788708134
160.9
170.9
180.926241528074395
190.934901951359278
200.955019867201297
210.851578945050111
220.968269224654479
231.01871133293986
241.00017451425986
251.02592335003503
261.02905400660581
271.04403065089105
281.06425718600190
290.94978470946149
301.06770782520313
311.07395301857720
321.08627804912002
331.08627804912002
341.10453610171873
351.12249721603218
361.12654097027768
371.15639794928788
381.15758369027902
391.16189500386223
401.16261102132562
411.09951889466403
421.16817498307274
431.01662396429348
441.19259833927652
451.19711725777657
461.22358610469991
471.24143548358242
481.24429900981065
491.25013925348526
501.18009246915324
511.27582742672131
521.28543043245315
531.30942325260026
541.08911305235127
551.36381816969859
561.43561036132703
571.38004342495139
581.48027383069272
591.51491832482525
601.57555461153352
611.58934976651378
621.59262441768236
631.60707706595153
641.71258640336062
651.71786571051420
661.83703428461281
671.70982393567288
681.85648314157984
691.87312087481748
701.96618728688287
711.97005614906337
722.01951682191979
732.09045449603669
742.15690567930802
752.17702191519945
762.19544984001001
771.73667694080545
782.36440766963955
792.72360556314328
803.3436506994601
813.37779073799443
823.49363512378028
833.82674811154072
844.07932583958403
854.42745811659374
865.03242815155576
875.03800059659232
887.71010139982277
897.94206420783854
908.30521311059531
9117.2715723317589
9219.1593678284676
9325.1186639887694


Summary of Cut Dendrogram
LabelHeight
135.1234995710451
 
Charts produced by software:
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/Nov/10/t1226341954cdtyziede3rm7ky/1zrnp1226341872.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/Nov/10/t1226341954cdtyziede3rm7ky/1zrnp1226341872.ps (open in new window)


http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/Nov/10/t1226341954cdtyziede3rm7ky/2dkob1226341872.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/Nov/10/t1226341954cdtyziede3rm7ky/2dkob1226341872.ps (open in new window)


 
Parameters (Session):
par1 = centroid ; par2 = 2 ; par3 = FALSE ; par4 = FALSE ;
 
Parameters (R input):
par1 = centroid ; par2 = 2 ; par3 = FALSE ; par4 = FALSE ;
 
R code (references can be found in the software module):
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')
}
 





Copyright

Creative Commons License

This work is licensed under a Creative Commons Attribution-Noncommercial-Share Alike 3.0 License.

Software written by Ed van Stee & Patrick Wessa


Disclaimer

Information provided on this web site is provided "AS IS" without warranty of any kind, either express or implied, including, without limitation, warranties of merchantability, fitness for a particular purpose, and noninfringement. We use reasonable efforts to include accurate and timely information and periodically update the information, and software without notice. However, we make no warranties or representations as to the accuracy or completeness of such information (or software), and we assume no liability or responsibility for errors or omissions in the content of this web site, or any software bugs in online applications. Your use of this web site is AT YOUR OWN RISK. Under no circumstances and under no legal theory shall we be liable to you or any other person for any direct, indirect, special, incidental, exemplary, or consequential damages arising from your access to, or use of, this web site.


Privacy Policy

We may request personal information to be submitted to our servers in order to be able to:

  • personalize online software applications according to your needs
  • enforce strict security rules with respect to the data that you upload (e.g. statistical data)
  • manage user sessions of online applications
  • alert you about important changes or upgrades in resources or applications

We NEVER allow other companies to directly offer registered users information about their products and services. Banner references and hyperlinks of third parties NEVER contain any personal data of the visitor.

We do NOT sell, nor transmit by any means, personal information, nor statistical data series uploaded by you to third parties.

We carefully protect your data from loss, misuse, alteration, and destruction. However, at any time, and under any circumstance you are solely responsible for managing your passwords, and keeping them secret.

We store a unique ANONYMOUS USER ID in the form of a small 'Cookie' on your computer. This allows us to track your progress when using this website which is necessary to create state-dependent features. The cookie is used for NO OTHER PURPOSE. At any time you may opt to disallow cookies from this website - this will not affect other features of this website.

We examine cookies that are used by third-parties (banner and online ads) very closely: abuse from third-parties automatically results in termination of the advertising contract without refund. We have very good reason to believe that the cookies that are produced by third parties (banner ads) do NOT cause any privacy or security risk.

FreeStatistics.org is safe. There is no need to download any software to use the applications and services contained in this website. Hence, your system's security is not compromised by their use, and your personal data - other than data you submit in the account application form, and the user-agent information that is transmitted by your browser - is never transmitted to our servers.

As a general rule, we do not log on-line behavior of individuals (other than normal logging of webserver 'hits'). However, in cases of abuse, hacking, unauthorized access, Denial of Service attacks, illegal copying, hotlinking, non-compliance with international webstandards (such as robots.txt), or any other harmful behavior, our system engineers are empowered to log, track, identify, publish, and ban misbehaving individuals - even if this leads to ban entire blocks of IP addresses, or disclosing user's identity.


FreeStatistics.org is powered by