Michaël Mertens opdracht 5

R Software Module: rwasp_centraltendency.wasp (opens new window with default values)

Title produced by software: Central Tendency

Date of computation: Mon, 11 Aug 2008 05:22:55 -0600

Cite this page as follows:

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2008/Aug/11/t1218453821e4yg72ohiq5i1mh.htm/, Retrieved Mon, 11 Aug 2008 11:23:41 +0000

IsPrivate?

No (this computation is public)

User-defined keywords:

Dataseries X:

» Textbox « » Textfile « » CSV «

15.14 15.09 15.17 15.18 15.21 15.27 15.28 15.3 15.34 15.33 15.27 15.35 15.38 15.38 15.39 15.4 15.39 15.43 15.43 15.47 15.48 15.47 15.58 15.56 15.61 15.56 15.62 15.63 15.58 15.65 15.79 15.76 15.77 15.79 15.87 15.79 15.9 15.96 16.05 16.18 16.29 16.43 16.38 16.39 16.35 16.48 16.52 16.44 16.46 16.52 16.47 16.59 16.59 16.59 16.54 16.48 16.47 16.56 16.61 16.57 16.72 16.69 16.72 16.81 16.75 16.85 16.84 16.92 17.02 17.11 17.2 17.3 17.37 17.42 17.51 17.56 17.62 17.59 17.78 17.73 17.79 17.85 17.86 17.79 17.97 17.96 18.03 18.02 18.03 18.14 18.16 18.24 18.28 18.18 18.19 18.32

Text written by user:

Output produced by software:

Summary of computational transaction Raw Input view raw input (R code) Raw Output view raw output of R engine Computing time 3 seconds R Server 'Herman Ole Andreas Wold' @ 193.190.124.10:1001 Central Tendency - Ungrouped Data Measure Value S.E. Value/S.E. Arithmetic Mean 16.4880208333333 0.100419691640213 164.191111962454 Geometric Mean 16.4593066569722 Harmonic Mean 16.4309626518986 Quadratic Mean 16.5170464028833 Winsorized Mean ( 1 / 32 ) 16.488125 0.10026547136381 164.444696421696 Winsorized Mean ( 2 / 32 ) 16.4879166666667 0.100022685657799 164.841771226537 Winsorized Mean ( 3 / 32 ) 16.4866666666667 0.0996948927349185 165.371226292439 Winsorized Mean ( 4 / 32 ) 16.4875 0.0994493611774178 165.787892499242 Winsorized Mean ( 5 / 32 ) 16.4895833333333 0.0988491803365935 166.815579827615 Winsorized Mean ( 6 / 32 ) 16.4883333333333 0.0986278298981041 167.177290125596 Winsorized Mean ( 7 / 32 ) 16.4810416666667 0.097152719256427 169.640559655013 Winsorized Mean ( 8 / 32 ) 16.4827083333333 0.0969372512684341 170.034822709076 Winsorized Mean ( 9 / 32 ) 16.4845833333333 0.0964220570450316 170.962784227209 Winsorized Mean ( 10 / 32 ) 16.4804166666667 0.0954264340362014 172.702845213880 Winsorized Mean ( 11 / 32 ) 16.4804166666667 0.0950947031042189 173.305306485946 Winsorized Mean ( 12 / 32 ) 16.4716666666667 0.0926171219945303 177.846885240501 Winsorized Mean ( 13 / 32 ) 16.4703125 0.092403868150811 178.242673489805 Winsorized Mean ( 14 / 32 ) 16.4630208333333 0.0908623549072493 181.186376361679 Winsorized Mean ( 15 / 32 ) 16.4630208333333 0.0908623549072493 181.186376361679 Winsorized Mean ( 16 / 32 ) 16.4630208333333 0.090399711781444 182.113642940979 Winsorized Mean ( 17 / 32 ) 16.4594791666667 0.0883964566487983 186.200666753654 Winsorized Mean ( 18 / 32 ) 16.4388541666667 0.0853326655579255 192.644329802491 Winsorized Mean ( 19 / 32 ) 16.4408333333333 0.0834927860454867 196.913219836459 Winsorized Mean ( 20 / 32 ) 16.4345833333333 0.0825917773224825 198.985708579244 Winsorized Mean ( 21 / 32 ) 16.4258333333333 0.0807652091302187 203.377586837543 Winsorized Mean ( 22 / 32 ) 16.4235416666667 0.0756447403069845 217.114125846900 Winsorized Mean ( 23 / 32 ) 16.4115625 0.073997440704469 221.785542091172 Winsorized Mean ( 24 / 32 ) 16.3990625 0.0710294104710439 230.877074598350 Winsorized Mean ( 25 / 32 ) 16.3730208333333 0.0676129853275609 242.157933923667 Winsorized Mean ( 26 / 32 ) 16.3567708333333 0.0635167291804463 257.519098423109 Winsorized Mean ( 27 / 32 ) 16.3342708333333 0.0600642464497112 271.946653771961 Winsorized Mean ( 28 / 32 ) 16.3080208333333 0.0562720950351221 289.80653418279 Winsorized Mean ( 29 / 32 ) 16.2929166666667 0.053125537492981 306.687093167185 Winsorized Mean ( 30 / 32 ) 16.3241666666667 0.0484794373724904 336.723517256201 Winsorized Mean ( 31 / 32 ) 16.3177083333333 0.0470070168256607 347.133458688781 Winsorized Mean ( 32 / 32 ) 16.304375 0.0440189882522803 370.394133244428 Trimmed Mean ( 1 / 32 ) 16.4834042553191 0.0995612145491192 165.560497930516 Trimmed Mean ( 2 / 32 ) 16.4784782608696 0.0987377254774284 166.891410362056 Trimmed Mean ( 3 / 32 ) 16.4734444444444 0.0979199603221474 168.233773688719 Trimmed Mean ( 4 / 32 ) 16.4686363636364 0.0970979347330291 169.608513393378 Trimmed Mean ( 5 / 32 ) 16.4633720930233 0.0962110667738937 171.117238848561 Trimmed Mean ( 6 / 32 ) 16.4573809523810 0.0953297142502625 172.636423824544 Trimmed Mean ( 7 / 32 ) 16.4513414634146 0.0943413692580383 174.380990998950 Trimmed Mean ( 8 / 32 ) 16.44625 0.093498692707303 175.898181287784 Trimmed Mean ( 9 / 32 ) 16.4406410256410 0.0925324217542728 177.674383896495 Trimmed Mean ( 10 / 32 ) 16.4344736842105 0.0914733965230774 179.663971262556 Trimmed Mean ( 11 / 32 ) 16.4285135135135 0.0903894823132819 181.752490368003 Trimmed Mean ( 12 / 32 ) 16.4222222222222 0.089145048544805 184.219118058680 Trimmed Mean ( 13 / 32 ) 16.4165714285714 0.0880764973631167 186.389921489386 Trimmed Mean ( 14 / 32 ) 16.4107352941176 0.0868139898867445 189.033303451744 Trimmed Mean ( 15 / 32 ) 16.4053030303030 0.0855407098373971 191.783573709963 Trimmed Mean ( 16 / 32 ) 16.39953125 0.0839862604762513 195.264453459471 Trimmed Mean ( 17 / 32 ) 16.3933870967742 0.0821662499175278 199.514850844825 Trimmed Mean ( 18 / 32 ) 16.3871666666667 0.0802827248751 204.118217115339 Trimmed Mean ( 19 / 32 ) 16.3824137931034 0.078512837157997 208.659047184041 Trimmed Mean ( 20 / 32 ) 16.3771428571429 0.0766310583866748 213.714167622545 Trimmed Mean ( 21 / 32 ) 16.3720370370370 0.0744494724183479 219.908032995035 Trimmed Mean ( 22 / 32 ) 16.3673076923077 0.0720613925585838 227.130049964016 Trimmed Mean ( 23 / 32 ) 16.3624 0.0700154851676778 233.696873781767 Trimmed Mean ( 24 / 32 ) 16.358125 0.0677341331096853 241.504899361603 Trimmed Mean ( 25 / 32 ) 16.3545652173913 0.0654126304647858 250.021518798202 Trimmed Mean ( 26 / 32 ) 16.3529545454545 0.0631381413972305 259.002786328009 Trimmed Mean ( 27 / 32 ) 16.3526190476190 0.0610459162728348 267.874086360399 Trimmed Mean ( 28 / 32 ) 16.35425 0.0590250788724372 277.072903796439 Trimmed Mean ( 29 / 32 ) 16.3584210526316 0.0571346719771197 286.313380064254 Trimmed Mean ( 30 / 32 ) 16.3644444444444 0.0552403757967466 296.240642979265 Trimmed Mean ( 31 / 32 ) 16.3682352941176 0.0538441511979134 303.992818717736 Trimmed Mean ( 32 / 32 ) 16.373125 0.0521618091584007 313.891049106050 Median 16.47 Midrange 16.705 Midmean - Weighted Average at Xnp 16.3262 Midmean - Weighted Average at X(n+1)p 16.358125 Midmean - Empirical Distribution Function 16.3262 Midmean - Empirical Distribution Function - Averaging 16.358125 Midmean - Empirical Distribution Function - Interpolation 16.358125 Midmean - Closest Observation 16.3262 Midmean - True Basic - Statistics Graphics Toolkit 16.358125 Midmean - MS Excel (old versions) 16.3466666666667 Number of observations 96

Charts produced by software:

http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/Aug/11/t1218453821e4yg72ohiq5i1mh/1hsve1218453768.png (open in new window) http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/Aug/11/t1218453821e4yg72ohiq5i1mh/1hsve1218453768.ps (open in new window) http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/Aug/11/t1218453821e4yg72ohiq5i1mh/2k6m31218453768.png (open in new window) http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/Aug/11/t1218453821e4yg72ohiq5i1mh/2k6m31218453768.ps (open in new window)

Parameters (Session):

Parameters (R input):

R code (references can be found in the software module):

geomean <- function(x) { return(exp(mean(log(x)))) } harmean <- function(x) { return(1/mean(1/x)) } quamean <- function(x) { return(sqrt(mean(x*x))) } winmean <- function(x) { x <-sort(x[!is.na(x)]) n<-length(x) denom <- 3 nodenom <- n/denom if (nodenom>40) denom <- n/40 sqrtn = sqrt(n) roundnodenom = floor(nodenom) win <- array(NA,dim=c(roundnodenom,2)) for (j in 1:roundnodenom) { win[j,1] <- (j*x[j+1]+sum(x[(j+1):(n-j)])+j*x[n-j])/n win[j,2] <- sd(c(rep(x[j+1],j),x[(j+1):(n-j)],rep(x[n-j],j)))/sqrtn } return(win) } trimean <- function(x) { x <-sort(x[!is.na(x)]) n<-length(x) denom <- 3 nodenom <- n/denom if (nodenom>40) denom <- n/40 sqrtn = sqrt(n) roundnodenom = floor(nodenom) tri <- array(NA,dim=c(roundnodenom,2)) for (j in 1:roundnodenom) { tri[j,1] <- mean(x,trim=j/n) tri[j,2] <- sd(x[(j+1):(n-j)]) / sqrt(n-j*2) } return(tri) } midrange <- function(x) { return((max(x)+min(x))/2) } q1 <- function(data,n,p,i,f) { np <- n*p; i <<- floor(np) f <<- np - i qvalue <- (1-f)*data[i] + f*data[i+1] } q2 <- function(data,n,p,i,f) { np <- (n+1)*p i <<- floor(np) f <<- np - i qvalue <- (1-f)*data[i] + f*data[i+1] } q3 <- function(data,n,p,i,f) { np <- n*p i <<- floor(np) f <<- np - i if (f==0) { qvalue <- data[i] } else { qvalue <- data[i+1] } } q4 <- function(data,n,p,i,f) { np <- n*p i <<- floor(np) f <<- np - i if (f==0) { qvalue <- (data[i]+data[i+1])/2 } else { qvalue <- data[i+1] } } q5 <- function(data,n,p,i,f) { np <- (n-1)*p i <<- floor(np) f <<- np - i if (f==0) { qvalue <- data[i+1] } else { qvalue <- data[i+1] + f*(data[i+2]-data[i+1]) } } q6 <- function(data,n,p,i,f) { np <- n*p+0.5 i <<- floor(np) f <<- np - i qvalue <- data[i] } q7 <- function(data,n,p,i,f) { np <- (n+1)*p i <<- floor(np) f <<- np - i if (f==0) { qvalue <- data[i] } else { qvalue <- f*data[i] + (1-f)*data[i+1] } } q8 <- function(data,n,p,i,f) { np <- (n+1)*p i <<- floor(np) f <<- np - i if (f==0) { qvalue <- data[i] } else { if (f == 0.5) { qvalue <- (data[i]+data[i+1])/2 } else { if (f < 0.5) { qvalue <- data[i] } else { qvalue <- data[i+1] } } } } midmean <- function(x,def) { x <-sort(x[!is.na(x)]) n<-length(x) if (def==1) { qvalue1 <- q1(x,n,0.25,i,f) qvalue3 <- q1(x,n,0.75,i,f) } if (def==2) { qvalue1 <- q2(x,n,0.25,i,f) qvalue3 <- q2(x,n,0.75,i,f) } if (def==3) { qvalue1 <- q3(x,n,0.25,i,f) qvalue3 <- q3(x,n,0.75,i,f) } if (def==4) { qvalue1 <- q4(x,n,0.25,i,f) qvalue3 <- q4(x,n,0.75,i,f) } if (def==5) { qvalue1 <- q5(x,n,0.25,i,f) qvalue3 <- q5(x,n,0.75,i,f) } if (def==6) { qvalue1 <- q6(x,n,0.25,i,f) qvalue3 <- q6(x,n,0.75,i,f) } if (def==7) { qvalue1 <- q7(x,n,0.25,i,f) qvalue3 <- q7(x,n,0.75,i,f) } if (def==8) { qvalue1 <- q8(x,n,0.25,i,f) qvalue3 <- q8(x,n,0.75,i,f) } midm <- 0 myn <- 0 roundno4 <- round(n/4) round3no4 <- round(3*n/4) for (i in 1:n) { if ((x[i]>=qvalue1) & (x[i]<=qvalue3)){ midm = midm + x[i] myn = myn + 1 } } midm = midm / myn return(midm) } (arm <- mean(x)) sqrtn <- sqrt(length(x)) (armse <- sd(x) / sqrtn) (armose <- arm / armse) (geo <- geomean(x)) (har <- harmean(x)) (qua <- quamean(x)) (win <- winmean(x)) (tri <- trimean(x)) (midr <- midrange(x)) midm <- array(NA,dim=8) for (j in 1:8) midm[j] <- midmean(x,j) midm bitmap(file='test1.png') lb <- win[,1] - 2*win[,2] ub <- win[,1] + 2*win[,2] if ((ylimmin == '') | (ylimmax == '')) plot(win[,1],type='b',main=main, xlab='j', pch=19, ylab='Winsorized Mean(j/n)', ylim=c(min(lb),max(ub))) else plot(win[,1],type='l',main=main, xlab='j', pch=19, ylab='Winsorized Mean(j/n)', ylim=c(ylimmin,ylimmax)) lines(ub,lty=3) lines(lb,lty=3) grid() dev.off() bitmap(file='test2.png') lb <- tri[,1] - 2*tri[,2] ub <- tri[,1] + 2*tri[,2] if ((ylimmin == '') | (ylimmax == '')) plot(tri[,1],type='b',main=main, xlab='j', pch=19, ylab='Trimmed Mean(j/n)', ylim=c(min(lb),max(ub))) else plot(tri[,1],type='l',main=main, xlab='j', pch=19, ylab='Trimmed Mean(j/n)', ylim=c(ylimmin,ylimmax)) lines(ub,lty=3) lines(lb,lty=3) grid() dev.off() load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Central Tendency - Ungrouped Data',4,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Measure',header=TRUE) a<-table.element(a,'Value',header=TRUE) a<-table.element(a,'S.E.',header=TRUE) a<-table.element(a,'Value/S.E.',header=TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/arithmetic_mean.htm', 'Arithmetic Mean', 'click to view the definition of the Arithmetic Mean'),header=TRUE) a<-table.element(a,arm) a<-table.element(a,hyperlink('http://www.xycoon.com/arithmetic_mean_standard_error.htm', armse, 'click to view the definition of the Standard Error of the Arithmetic Mean')) a<-table.element(a,armose) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/geometric_mean.htm', 'Geometric Mean', 'click to view the definition of the Geometric Mean'),header=TRUE) a<-table.element(a,geo) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/harmonic_mean.htm', 'Harmonic Mean', 'click to view the definition of the Harmonic Mean'),header=TRUE) a<-table.element(a,har) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/quadratic_mean.htm', 'Quadratic Mean', 'click to view the definition of the Quadratic Mean'),header=TRUE) a<-table.element(a,qua) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) for (j in 1:length(win[,1])) { a<-table.row.start(a) mylabel <- paste('Winsorized Mean (',j) mylabel <- paste(mylabel,'/') mylabel <- paste(mylabel,length(win[,1])) mylabel <- paste(mylabel,')') a<-table.element(a,hyperlink('http://www.xycoon.com/winsorized_mean.htm', mylabel, 'click to view the definition of the Winsorized Mean'),header=TRUE) a<-table.element(a,win[j,1]) a<-table.element(a,win[j,2]) a<-table.element(a,win[j,1]/win[j,2]) a<-table.row.end(a) } for (j in 1:length(tri[,1])) { a<-table.row.start(a) mylabel <- paste('Trimmed Mean (',j) mylabel <- paste(mylabel,'/') mylabel <- paste(mylabel,length(tri[,1])) mylabel <- paste(mylabel,')') a<-table.element(a,hyperlink('http://www.xycoon.com/arithmetic_mean.htm', mylabel, 'click to view the definition of the Trimmed Mean'),header=TRUE) a<-table.element(a,tri[j,1]) a<-table.element(a,tri[j,2]) a<-table.element(a,tri[j,1]/tri[j,2]) a<-table.row.end(a) } a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/median_1.htm', 'Median', 'click to view the definition of the Median'),header=TRUE) a<-table.element(a,median(x)) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/midrange.htm', 'Midrange', 'click to view the definition of the Midrange'),header=TRUE) a<-table.element(a,midr) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) mymid <- hyperlink('http://www.xycoon.com/midmean.htm', 'Midmean', 'click to view the definition of the Midmean') mylabel <- paste(mymid,hyperlink('http://www.xycoon.com/method_1.htm','Weighted Average at Xnp',''),sep=' - ') a<-table.element(a,mylabel,header=TRUE) a<-table.element(a,midm[1]) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) mymid <- hyperlink('http://www.xycoon.com/midmean.htm', 'Midmean', 'click to view the definition of the Midmean') mylabel <- paste(mymid,hyperlink('http://www.xycoon.com/method_2.htm','Weighted Average at X(n+1)p',''),sep=' - ') a<-table.element(a,mylabel,header=TRUE) a<-table.element(a,midm[2]) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) mymid <- hyperlink('http://www.xycoon.com/midmean.htm', 'Midmean', 'click to view the definition of the Midmean') mylabel <- paste(mymid,hyperlink('http://www.xycoon.com/method_3.htm','Empirical Distribution Function',''),sep=' - ') a<-table.element(a,mylabel,header=TRUE) a<-table.element(a,midm[3]) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) mymid <- hyperlink('http://www.xycoon.com/midmean.htm', 'Midmean', 'click to view the definition of the Midmean') mylabel <- paste(mymid,hyperlink('http://www.xycoon.com/method_4.htm','Empirical Distribution Function - Averaging',''),sep=' - ') a<-table.element(a,mylabel,header=TRUE) a<-table.element(a,midm[4]) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) mymid <- hyperlink('http://www.xycoon.com/midmean.htm', 'Midmean', 'click to view the definition of the Midmean') mylabel <- paste(mymid,hyperlink('http://www.xycoon.com/method_5.htm','Empirical Distribution Function - Interpolation',''),sep=' - ') a<-table.element(a,mylabel,header=TRUE) a<-table.element(a,midm[5]) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) mymid <- hyperlink('http://www.xycoon.com/midmean.htm', 'Midmean', 'click to view the definition of the Midmean') mylabel <- paste(mymid,hyperlink('http://www.xycoon.com/method_6.htm','Closest Observation',''),sep=' - ') a<-table.element(a,mylabel,header=TRUE) a<-table.element(a,midm[6]) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) mymid <- hyperlink('http://www.xycoon.com/midmean.htm', 'Midmean', 'click to view the definition of the Midmean') mylabel <- paste(mymid,hyperlink('http://www.xycoon.com/method_7.htm','True Basic - Statistics Graphics Toolkit',''),sep=' - ') a<-table.element(a,mylabel,header=TRUE) a<-table.element(a,midm[7]) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) mymid <- hyperlink('http://www.xycoon.com/midmean.htm', 'Midmean', 'click to view the definition of the Midmean') mylabel <- paste(mymid,hyperlink('http://www.xycoon.com/method_8.htm','MS Excel (old versions)',''),sep=' - ') a<-table.element(a,mylabel,header=TRUE) a<-table.element(a,midm[8]) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Number of observations',header=TRUE) a<-table.element(a,length(x)) a<-table.element(a,'') a<-table.element(a,'') a<-table.row.end(a) a<-table.end(a) table.save(a,file='mytable.tab')

Copyright

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