Home » date » 2010 » Oct » 19 »

Centrummaten cijfers uniplant

*Unverified author*

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

Title produced by software: Central Tendency

Date of computation: Tue, 19 Oct 2010 15:30:56 +0000

Cite this page as follows:

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2010/Oct/19/t1287502189e7a7235xadvz40x.htm/, Retrieved Tue, 19 Oct 2010 17:29:51 +0200

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/2010/Oct/19/t1287502189e7a7235xadvz40x.htm/},
    year = {2010},
}
@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 = {2010},
    note = {{ISBN} 3-900051-07-0},
    url = {http://www.R-project.org},
}

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords:

KDGP1W52

Dataseries X:

» Textbox « » Textfile « » CSV «

2834 4683 4120 3849 8435 12854 15883 10520 12562 5060 4520 2150 2905 4820 3950 4053 8700 13520 15400 11100 11950 4900 4633 2300 2945 3960 3900 3767 8820 11980 14085 11600 9814 4930 4360 2640 3050 5485 4366 4790 10100 14830 17930 13580 12490 6400 4980 4930 5856 5120 5100 5623 12035 19846 17030 15860 14890 8053 6080 5987 5682 4980 5450 6035 13240 18400 17689 16490 14062 9556 7555 4328

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	1 seconds
R Server	'George Udny Yule' @ 72.249.76.132

Central Tendency - Ungrouped Data
Measure	Value	S.E.	Value/S.E.
Arithmetic Mean	8421.94444444445	575.515576462985	14.6337384927167
Geometric Mean	7098.45577683783
Harmonic Mean	5992.11353288074
Quadratic Mean	9718.31461297002
Winsorized Mean ( 1 / 24 )	8403.94444444445	569.908818479438	14.7461210845392
Winsorized Mean ( 2 / 24 )	8400.33333333333	565.356047535651	14.8584831982426
Winsorized Mean ( 3 / 24 )	8398.375	561.850829867231	14.9476952841461
Winsorized Mean ( 4 / 24 )	8365.70833333333	552.996751751908	15.1279520301531
Winsorized Mean ( 5 / 24 )	8330.98611111111	544.51400043688	15.2998565774744
Winsorized Mean ( 6 / 24 )	8289.15277777778	532.881855070254	15.5553293828797
Winsorized Mean ( 7 / 24 )	8356.625	523.2949682558	15.9692439387551
Winsorized Mean ( 8 / 24 )	8314.625	512.028837749982	16.2385873353093
Winsorized Mean ( 9 / 24 )	8257.25	499.063127649698	16.5455020467790
Winsorized Mean ( 10 / 24 )	8255.86111111111	496.6553836926	16.6229167792954
Winsorized Mean ( 11 / 24 )	8143.56944444444	475.836422305814	17.1142204814466
Winsorized Mean ( 12 / 24 )	8155.23611111111	473.256522934054	17.2321684243273
Winsorized Mean ( 13 / 24 )	8080.30555555556	456.745687124597	17.6910385436246
Winsorized Mean ( 14 / 24 )	8109.08333333333	449.904427666195	18.0240131785274
Winsorized Mean ( 15 / 24 )	8057.41666666667	439.326993990433	18.3403632758385
Winsorized Mean ( 16 / 24 )	7972.97222222222	425.103290850713	18.7553763845648
Winsorized Mean ( 17 / 24 )	7940.38888888889	409.739397480919	19.3791198447268
Winsorized Mean ( 18 / 24 )	7950.63888888889	403.587534503815	19.6999119377254
Winsorized Mean ( 19 / 24 )	7843.76388888889	383.294261885651	20.4640785653841
Winsorized Mean ( 20 / 24 )	7858.20833333333	377.515700394573	20.8155801867844
Winsorized Mean ( 21 / 24 )	7858.20833333333	375.171048072757	20.9456683123624
Winsorized Mean ( 22 / 24 )	7775.70833333333	356.08081543313	21.8369201493630
Winsorized Mean ( 23 / 24 )	7625.56944444444	331.092563984480	23.0315333956032
Winsorized Mean ( 24 / 24 )	7432.23611111111	302.908236344228	24.5362628656457
Trimmed Mean ( 1 / 24 )	8348.34285714286	561.527382040123	14.8672052764585
Trimmed Mean ( 2 / 24 )	8289.4705882353	551.37863907721	15.0340800327495
Trimmed Mean ( 3 / 24 )	8229	541.948952085588	15.184086929834
Trimmed Mean ( 4 / 24 )	8165.484375	532.000372020037	15.3486441071369
Trimmed Mean ( 5 / 24 )	8107.35483870968	523.052033218120	15.5000923881866
Trimmed Mean ( 6 / 24 )	8053.68333333333	514.644588289024	15.649019763539
Trimmed Mean ( 7 / 24 )	8004.96551724138	507.394904000699	15.7765981765366
Trimmed Mean ( 8 / 24 )	7940.375	500.400097430163	15.8680524659733
Trimmed Mean ( 9 / 24 )	7878	494.072956811735	15.9450135681113
Trimmed Mean ( 10 / 24 )	7819.65384615385	488.737289269023	15.9997078550099
Trimmed Mean ( 11 / 24 )	7756.84	481.981979813879	16.0936307265997
Trimmed Mean ( 12 / 24 )	7704.10416666667	477.580776688135	16.1315206614724
Trimmed Mean ( 13 / 24 )	7645.26086956522	471.734116583253	16.2067160309275
Trimmed Mean ( 14 / 24 )	7590.5	467.134969585585	16.2490511184248
Trimmed Mean ( 15 / 24 )	7527	461.585096589706	16.3068523130646
Trimmed Mean ( 16 / 24 )	7463.35	455.775184333072	16.3750687982738
Trimmed Mean ( 17 / 24 )	7403	450.437833469579	16.4351203427497
Trimmed Mean ( 18 / 24 )	7339.77777777778	445.612152720903	16.4712244335375
Trimmed Mean ( 19 / 24 )	7267.91176470588	438.937508226072	16.5579646954267
Trimmed Mean ( 20 / 24 )	7199.71875	433.728788256962	16.5995869882968
Trimmed Mean ( 21 / 24 )	7120.7	425.846748512174	16.721273615164
Trimmed Mean ( 22 / 24 )	7030.39285714286	412.962638878170	17.0242830592162
Trimmed Mean ( 23 / 24 )	6936.57692307692	398.609340942219	17.4019427308966
Trimmed Mean ( 24 / 24 )	6846.70833333333	384.77322268517	17.7941393258945
Median	6011
Midrange	10998
Midmean - Weighted Average at Xnp	7263.56756756757
Midmean - Weighted Average at X(n+1)p	7339.77777777778
Midmean - Empirical Distribution Function	7263.56756756757
Midmean - Empirical Distribution Function - Averaging	7339.77777777778
Midmean - Empirical Distribution Function - Interpolation	7339.77777777778
Midmean - Closest Observation	7263.56756756757
Midmean - True Basic - Statistics Graphics Toolkit	7339.77777777778
Midmean - MS Excel (old versions)	7403
Number of observations	72

Charts produced by software:

http://www.freestatistics.org/blog/date/2010/Oct/19/t1287502189e7a7235xadvz40x/1ikpe1287502254.png (open in new window)

http://www.freestatistics.org/blog/date/2010/Oct/19/t1287502189e7a7235xadvz40x/1ikpe1287502254.ps (open in new window)

http://www.freestatistics.org/blog/date/2010/Oct/19/t1287502189e7a7235xadvz40x/2fevn1287502254.png (open in new window)

http://www.freestatistics.org/blog/date/2010/Oct/19/t1287502189e7a7235xadvz40x/2fevn1287502254.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')

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.

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