Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_tukeylambda.wasp

Title produced by software

Tukey lambda PPCC Plot

Date of computation

Tue, 13 Dec 2011 11:08:28 -0500

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2011/Dec/13/t1323792523kfmv5tybjgz0wd2.htm/, Retrieved Thu, 02 May 2024 15:25:40 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=154473, Retrieved Thu, 02 May 2024 15:25:40 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

130

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-       [Tukey lambda PPCC Plot] [] [2011-12-13 16:08:28] [d76b387543b13b5e3afd8ff9e5fdc89f] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

0.00253640684032659
0.0368714319390362
0.0298947226568126
-0.0427985418877083
0.0707157863707075
0.00557633831590632
-0.0264337448407613
0.035076421441058
0.0385908805865415
0.0445350379256959
0.00701656465838288
-0.0810507068546295
0.028668061326572
0.0231230986294524
-0.0204564112005182
-0.0148258056333128
-0.0151853535472709
-0.038706147942796
0.0845909229493281
0.016671579447883
0.00225406385247048
-0.00596195867236736
0.0352496077667686
-0.0631850226345009
0.0150964840499119
0.0488660153645363
-0.0128787996464003
-0.0355158961134133
0.00353489461180296
0.0237338628108983
-0.0158854579171335
0.137349715843857
-0.0671948766384515
-0.0057790658946917
0.00432145953565087
-0.0836733674716462
0.0475621708264862
0.0423608713321453
-0.0227310458296951
0.0794861683342258
-0.0292719148325183
0.0646854395927334
0.0233414040934054
-0.0406456764524378
-0.0745009618513818
0.007970708745269
-0.00317261400382908
0.0356222773464421
0.0936199569684244
0.0211767401811859
-0.0060533499452808
-0.0304513696335594
-0.0863680133592982
-0.0549526580419652
-0.0346807461887406
-0.0048098747284794
-0.00425402585948387
0.0373382423379327
0.0295513251524583
0.0266523204642118
0.0456707310877539
-0.0580627598376168
-0.029674061898065
0.131418308988915
-0.0184232166623109
0.137136455308305
-0.0354034058410934
0.0430832067458516
0.0701258586326328
0.0123236427151614
-0.0593886201751269
0.00208573573506368
-0.153014732632414
0.0905009622437158
0.0250094522178306
-0.0285621101354244
0.0466057490821428
0.0883247255253856
-0.00367779752245087
0.0255595915644849
0.0275306483253506
-0.0088929753494876
0.0317979050718863
-0.148541274854515
-0.0565031812946146
0.0517820403999405
0.113641575172051
0.00869609065811775
-0.0268581028442834
-0.0894800700020809
0.0594686503299612
0.016724631716148
-0.00326570485564935
0.00247430041808289
0.0866392045247575
-0.0490789543599012
-0.0428668074291988
0.0160100587239435
0.116485024708292
-0.0409399010562724
-0.0301260141831517
-0.0553205788441819
0.0245512561410643
0.0145951771821839
0.0380503588913957
0.0381449874704152
-0.0235452419803956
-0.0524065994615107
0.0362557610244885
0.0454642657295855
-0.0895811001537827
-0.0180770018724645
0.014115048734183
-0.00550539223010707
0.0871918970986016
-0.0419852405291697
-0.0308394208485245
-0.0623619667657128
0.0285493797882826
-0.0340822091452664
-0.0171042491719203
-0.0592288196638465
-0.0516368000537462
0.0357360201899008
0.0995866621575195
-0.0513534217775424
-0.0614583255861703
0.0222049721308732
0.0490414916235135
0.0150656828713082
0.0552568290090917
0.000543181887368194
-0.0492981709619814
0.105027825072444
0.0477940191717168
-0.0286275889568511
-0.00377462703934284
0.0450525242884245
-0.0997120743248661
-0.0117789161362273
0.0030555134339913
-0.00567764234131555
0.00806126486821814
0.0157566853430451
0.0138593171596846
0.0608407570219986
0.0275281297595811
-0.0387923582963318
0.0363208074600507
0.00362476211282674
0.0187020736528006
-0.0122590245346604
0.0384366213607572
-0.0366680398945289
0.0667555992382232
-0.0530362203227239
-0.0199051273080949
0.00431693690611548
0.0625350548439742
0.0141079455393043
-0.0476928421769464
-0.0126836175256575
0.0152699426947765
0.0118193850524337
0.0170927374140683
-0.0322846370817743
-0.0203675534859398
-0.016293531625602
0.0992109891665308
0.0004940152073686
-0.102959225784361
-0.00646554127096813
0.0407640358524901
0.0645344834189312
0.00060518766015786
-0.0457396582290904
-0.0635568783376816
0.011597275973638
0.0416269697872653
0.0197085460352963
0.017721309611278
-0.0271222767013021
0.0386539307793823
0.0636517103366577
-0.0209602907320655
-0.113814835904718
-0.0618571065773143
-0.0517746123907544
0.033015741824037
0.0223248460181379
0.058304639326187
0.0349779089885565
0.0711129102577924
-0.0634833387948904
-0.0713649955562481
0.0588355969342543
-0.0318422151517473
0.00466203359440979
0.0183735584991029
-0.0545811599476999
-0.0143594476628201
-0.030268244982477
-0.00273766312801079
0.114957671896145
0.0184421228093658
0.0254820883303804
0.101299210372592
-0.0168596669821389
-0.0297723783067315
0.101248897359162
-0.125723131319304
-0.0883978341095783
-0.0181743890531197
0.0901895081895336
0.0429730117447574
0.0992863452655092
0.00133117448225707
0.0724060899395446
-0.0901393173953521
-0.0394092715242177
0.0164739879845599
0.0243306251520263
0.0125804682935785
-0.00103031315369906
-0.0124127287295305
-0.0502095637258954
0.0727545982521558
-0.0391662513067094
-0.0225546917614045
0.00167323354854625
-0.00392228781206813
-0.0126601895140712
0.0616296699311261
0.000456321625745595
0.0329136042705706
0.0172381926041682
-0.0241650464525066
0.0143471327532672
-0.0294731662470898
0.0626394477738673
-0.0201437310685978
-0.0422121623413294
-0.0139837030194931
0.0763140703118163
0.0352388539507022
-0.0795772059165631
-0.0197502524876591
-0.0317639169546432
0.0709256888294792
-0.0785018586099128
-0.112598581476593
0.0274446535777733
-0.0666179849897722
0.0272173477232175
0.0809969329025951
0.0730343610001509
0.040911567240208
-0.0811057317544043
0.0571067710238383
-0.0554290151878879
0.0248019460749632
-0.0216636475112343
0.0532750228334109
-0.0450150257122168
0.060970474165796
0.0202779209953934
-0.00123237154778178
-0.066128810360477
-0.0606031203129807
0.0477506832711103
-0.0173265243243564
0.0669670263168943
0.0525626514307176
-0.0950764136714217
-0.0326084581778967
-0.0212306899588622
0.117270462747125
0.0126542577940661
0.0355403012871213
-0.132946903627468
0.0438494190929714
-0.0554067562319668
0.0514950097335382
-0.0451560996160978
0.0560052832926471
0.000622869169839451
0.0253008571607579
-0.0214601111791506
0.0358086118219763
0.0447310290154976
0.0124440478420136
-0.0165257881895508
-0.00576891245484052
-0.00615546013122912
-0.0776427913612058
-0.0117082296136208
-0.00763381628177744
0.0253753071360954
-0.0187194637412484
0.0259905617706504
-0.0144214328069475
0.076400928122637
-0.0524746129509778
0.00911324507178801
0.0579569845811867
-0.0484948718128919
0.0224096420044452
-0.00481462690716556
0.0188874729021521
-0.080909759982892
0.0234725414311933
0.0154065353470952
0.102086869217646
-0.135104659047162
0.0592221975856021
-0.00271181925297654
-0.00416459118500639
-0.059165909304876
-0.0137236944987028
0.028185914652426
0.022079166910874
-0.00492588258970499
-0.0759110960709172
-0.0600324519402075
0.0772745112429163
0.171597497458184
0.0349442822964569
-0.0498430440289159
-0.122438761089771
0.0204249968845572
0.0223364858703852
0.0243004941377639
0.0190536242892182
-0.0555417984946328
-0.173478478439254
0.0067442468065799
0.0240485054406333
-0.029692540233252
-0.00702085054726908
-0.0807881457197235
-0.0186754348099912
-0.0204948873103633
-0.0949012365640563
0.0294871040905084
-0.0191748514432641
0.0110740766373196
-0.0865864825634172
-0.00827941813637171
-0.00302495412530887
0.0300345599812042
-0.000623540855839092
0.0436047518469798
0.0415294067494275
0.0232531873190558
0.040541507475791
0.038355198313141
0.0531578570242781
-0.0753914908508738
-0.0156570501624987
-0.0966847143482195
-0.0560471574379224
0.00233317006155742
-0.002358504473244
-0.00166591267112976
0.016539168492148
0.114144306024315
-0.0124497808448716
-0.0298762040405075
-0.0561401520665161
0.0105112737872782

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	'AstonUniversity' @ aston.wessa.net

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 1 seconds \tabularnewline
R Server & 'AstonUniversity' @ aston.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=154473&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'AstonUniversity' @ aston.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=154473&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=154473&T=0

As an alternative you can also use a QR Code:

The GUIDs for individual cells are displayed in the table below:

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	'AstonUniversity' @ aston.wessa.net

Tukey Lambda - Key Values
Distribution (lambda)	Correlation
Approx. Cauchy (lambda=-1)	0.496501546229968
Exact Logistic (lambda=0)	0.998065827824197
Approx. Normal (lambda=0.14)	0.997846205296934
U-shaped (lambda=0.5)	0.982448328519059
Exactly Uniform (lambda=1)	0.966132048761305

\begin{tabular}{lllllllll}
\hline
Tukey Lambda - Key Values \tabularnewline
Distribution (lambda) & Correlation \tabularnewline
Approx. Cauchy (lambda=-1) & 0.496501546229968 \tabularnewline
Exact Logistic (lambda=0) & 0.998065827824197 \tabularnewline
Approx. Normal (lambda=0.14) & 0.997846205296934 \tabularnewline
U-shaped (lambda=0.5) & 0.982448328519059 \tabularnewline
Exactly Uniform (lambda=1) & 0.966132048761305 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=154473&T=1

[TABLE]
[ROW][C]Tukey Lambda - Key Values[/C][/ROW]
[ROW][C]Distribution (lambda)[/C][C]Correlation[/C][/ROW]
[ROW][C]Approx. Cauchy (lambda=-1)[/C][C]0.496501546229968[/C][/ROW]
[ROW][C]Exact Logistic (lambda=0)[/C][C]0.998065827824197[/C][/ROW]
[ROW][C]Approx. Normal (lambda=0.14)[/C][C]0.997846205296934[/C][/ROW]
[ROW][C]U-shaped (lambda=0.5)[/C][C]0.982448328519059[/C][/ROW]
[ROW][C]Exactly Uniform (lambda=1)[/C][C]0.966132048761305[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=154473&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=154473&T=1

As an alternative you can also use a QR Code:

The GUIDs for individual cells are displayed in the table below:

Tukey Lambda - Key Values
Distribution (lambda)	Correlation
Approx. Cauchy (lambda=-1)	0.496501546229968
Exact Logistic (lambda=0)	0.998065827824197
Approx. Normal (lambda=0.14)	0.997846205296934
U-shaped (lambda=0.5)	0.982448328519059
Exactly Uniform (lambda=1)	0.966132048761305

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = FALSE ; par2 = 0.2 ; par3 = 1 ; par4 = 1 ; par5 = 12 ; par6 = 3 ; par7 = 1 ; par8 = 2 ; par9 = 1 ;

Parameters (R input):

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

gp <- function(lambda, p)
{
(p^lambda-(1-p)^lambda)/lambda
}
sortx <- sort(x)
c <- array(NA,dim=c(201))
for (i in 1:201)
{
if (i != 101) c[i] <- cor(gp(ppoints(x), lambda=(i-101)/100),sortx)
}
bitmap(file='test1.png')
plot((-100:100)/100,c[1:201],xlab='lambda',ylab='correlation',main='PPCC Plot - Tukey lambda')
grid()
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Tukey Lambda - Key Values',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Distribution (lambda)',1,TRUE)
a<-table.element(a,'Correlation',1,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Approx. Cauchy (lambda=-1)',header=TRUE)
a<-table.element(a,c[1])
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Exact Logistic (lambda=0)',header=TRUE)
a<-table.element(a,(c[100]+c[102])/2)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Approx. Normal (lambda=0.14)',header=TRUE)
a<-table.element(a,c[115])
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'U-shaped (lambda=0.5)',header=TRUE)
a<-table.element(a,c[151])
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Exactly Uniform (lambda=1)',header=TRUE)
a<-table.element(a,c[201])
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code