FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_tukeylambda.wasp
Title produced by softwareTukey lambda PPCC Plot
Date of computationSun, 31 Oct 2010 11:17:15 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Oct/31/t1288523741h3b9vmgvqzyfkz4.htm/, Retrieved Mon, 29 Apr 2024 09:41:49 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=90491, Retrieved Mon, 29 Apr 2024 09:41:49 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact189

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Central Tendency] [] [2010-10-20 19:08:13] [b98453cac15ba1066b407e146608df68]
- RM      [Tukey lambda PPCC Plot] [Workshop 4 part 2 q1] [2010-10-31 11:17:15] [c52f616cc59ab01e55ce1a10b5754887] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
0.00099950033305429
0.00099850232957088
-0.0009985023296184
-0.0030015030037291
0.001001502337127
-0.004012041489962
-0.0040282028286014
0.0020161297152037
0.0040201059166187
0.001002506349653
-0.0030105391528727
0.0010045204259987
-6.6613381477509E-15
0.0050075217305934
-0.0009995003331289
-4.5741188614556E-14
-0.001000500333546
0.001000500333538
-4.5741188614556E-14
-4.5741188614556E-14
-0.001000500333546
-0.0010015023370622
-0.001002506349673
0.002004008686753
0.001000500333538
-0.002002002670646
2.7089441800854E-14
-0.004016069654873
0.0020100509280176
-6.6613381477509E-15
0.0020060187268931
-0.001002506349673
0.002004008686753
-0.0020040086867623
-4.7073456244107E-14
-4.7073456244107E-14
-4.7073456244107E-14
0.001002506349653
0.0030015030037274
-2.8865798640254E-14
-0.0020000006666292
-0.0020040086867623
-4.7073456244107E-14
0.001002506349653
-0.001002506349673
-4.7073456244107E-14
0.001002506349653
-0.001002506349673
-0.0010035123772467
-6.6613381477509E-15
-0.0010045204260067
0.0020080328031984
0.001002506349653
-0.0020060187268727
-6.6613381477509E-15
-0.0010045204260067
-1.3322676295502E-15
-1.3322676295502E-15
-0.0010055305020016
1.7319479184152E-14
1.7319479184152E-14
0.0040160696549174
2.7089441800854E-14
2.7089441800854E-14
-0.0030105391528727
0.0010045204259987
-0.002010050928007
1.7319479184152E-14
-0.0010065426113823
1.9095836023553E-14
1.9095836023553E-14
0.002012073113419
0.0010045204259987
-0.002010050928007
1.7319479184152E-14
0.0020100509280176
-0.0030165935394066
0.0010065426114187
1.7319479184152E-14
0.0010055305020176
-0.0020120731134012
-0.001007556760281
1.8651746813703E-14
1.8651746813703E-14
0.0020140993717184
-0.0020140993716824
0.0050276626769183
0.002004008686753
0.0020000006666381
-2.8865798640254E-14
0.00099850232957088
-0.0019980026627184
-0.001000500333546
3.7747582837255E-14
0.001000500333538
-4.5741188614556E-14
0.00099950033305429
-0.0009995003331289
0.00099950033305429
0.0049825713444709
-0.00099453016649331
-0.00099552024148508
0.001990050408017
0.00099354205890689
-0.00099354205887092
0.00099354205890689
-0.00099354205887092
-0.0019900504079935
0.00099552024151706
-0.0019920325312848
-0.0019960086467439
0.001996008646671
0.00099651228975572
1.6875389974302E-14
0.00099552024151706
0.0029806281381153
-0.0029806281381224
1.5099033134902E-14
0.0019880722254153
2.9309887850104E-14
0.00099255591272929
-2.2204460492503E-14
-0.00099255591272218
-0.00099354205887092
0.00099354205890689
0.00099255591272929
0.0019821612039777
-1.3766765505352E-14
-0.00099058948171393
-0.00099157172231745
0.0019821612039777
-0.0019821612040136
-2.2204460492503E-14
-0.0029806281381224
-0.00099552024148508
0.001990050408017
0.00099354205890689
-0.00099354205887092
-0.00099453016649331
1.5099033134902E-14
1.5099033134902E-14
-0.0029895388483849
-0.0009985023296184
0.00099850232957088
0.00099750631708151
-4.3964831775156E-14
-4.3964831775156E-14
-0.00099750631714413
0.00099750631708151
0.00099651228975572
0.00099552024151706
1.5099033134902E-14
-0.0029895388483849
0.00099750631708151
-4.3964831775156E-14
-4.3964831775156E-14
-0.00099750631714413
-0.0009985023296184
-0.0009995003331289
-4.5741188614556E-14
0.00099950033305429
-0.0009995003331289
-0.002002002670646
0.001001502337127
3.7747582837255E-14
0.0020000006666381
-2.8865798640254E-14
-0.0009995003331289
0.001998002662654
-0.0009985023296184
-2.8865798640254E-14
0.00099850232957088
-0.0009985023296184
0.001996008646671
-0.0029955089798439
-4.5741188614556E-14
-4.5741188614556E-14
-4.5741188614556E-14
-0.001000500333546
0.001000500333538
0.0029955089797542
-4.3964831775156E-14
-4.3964831775156E-14
-4.3964831775156E-14
-4.3964831775156E-14
0.0019920325312559
0.00099453016651507
-0.00099453016649331
0.00099453016651507
0.00099354205890689
-0.0019880722253709
1.5099033134902E-14
-0.00099552024148508
0.00099552024151706
0.0019880722254153
2.9309887850104E-14
0.00099255591272929
-2.2204460492503E-14
-2.2204460492503E-14
-0.0019860979716224
-0.0029865626977932
0.00099651228975572
0.001990050408017
0.0019860979716069
-0.00099255591272218
2.9309887850104E-14
-0.0029835924668711
-0.00099651228978281
-0.0019960086467439
-0.0009995003331289
0.00099950033305429
0.001996008646671
-0.0019960086467439
0.00099850232957088
-1.8651746813703E-14
-1.8651746813703E-14
0.00099750631708151
-4.3964831775156E-14
0.00099651228975572
-0.001994018606883
-0.0009985023296184
-2.8865798640254E-14
-0.0009995003331289
0.00099950033305429
0.001996008646671
-4.3964831775156E-14
-0.00099750631714413
-1.8651746813703E-14
-0.0029985029962187
0.001000500333538
0.001998002662654
-0.0009985023296184
-2.8865798640254E-14
-2.8865798640254E-14
-2.8865798640254E-14
-0.0009995003331289
-0.0030045090203461
-4.7073456244107E-14
0.001002506349653
0.001001502337127
-0.0020040086867623
0.001002506349653
2.7089441800854E-14
-0.001002506349673
0.001002506349653
-0.001002506349673
-0.0010035123772467
-6.6613381477509E-15
0.001003512377193
-0.0010035123772467
0.001003512377193
-4.7073456244107E-14
-4.7073456244107E-14
-0.0010035123772467
-6.6613381477509E-15
0.0020060187268931
-0.0020060187268727
-0.0010045204260067
-0.0010055305020016
-0.0010065426113823
-0.001007556760281
1.8651746813703E-14
-0.0020181641562815
0.0010095912013557
-0.0020202027072966
0.0030287756621794
1.8651746813703E-14
0.0020140993717184
0.0010055305020176
-0.0020120731134012
0.0030165935394191
-0.0010045204260067
-1.3322676295502E-15
-1.3322676295502E-15
0.0020080328031984
-4.7073456244107E-14
0.001002506349653
2.7089441800854E-14
-0.001002506349673
0.0030045090202533
-0.001000500333546
-0.0010015023370622
0.0030015030037274
-0.0009995003331289
-0.002002002670646
0.0020020026706273
-4.5741188614556E-14
0.001998002662654
-0.0019980026627184
-0.001000500333546
-0.0010015023370622
-0.001002506349673
0.002004008686753
3.7747582837255E-14
0.0020000006666381
-2.8865798640254E-14
-2.8865798640254E-14
-0.0020000006666292
3.7747582837255E-14
-0.0020040086867623
0.001002506349653
-0.0020060187268727
-6.6613381477509E-15
-6.6613381477509E-15
0.001003512377193
-4.7073456244107E-14
-4.7073456244107E-14
0.001002506349653
2.7089441800854E-14
0.0020020026706273
-0.001000500333546
3.7747582837255E-14
-0.0010015023370622
0.0020020026706273
-0.001000500333546
-0.0010015023370622
0.0040000053333271
-0.0009985023296184
0.00099850232957088
0.00099750631708151
-4.3964831775156E-14
-4.3964831775156E-14
-4.3964831775156E-14
0.00099651228975572
0.00099552024151706
-0.0019920325312848
-4.3964831775156E-14
-4.3964831775156E-14
0.0019920325312559
1.5099033134902E-14
1.5099033134902E-14
0.00099453016651507
0.00099354205890689
2.9309887850104E-14
0.00099255591272929
-2.2204460492503E-14
-0.00099255591272218
0.00099255591272929
0.0019821612039777
0.00098960918518642
-0.0029717703891796
-2.2204460492503E-14
-0.00099255591272218
-0.00099354205887092
0.00099354205890689
2.9309887850104E-14
-0.00099354205887092
0.0019860979716069
0.00099157172227748
-1.7763568394003E-14
-1.7763568394003E-14
-1.7763568394003E-14
-0.00099157172231745
0.00099157172227748
-1.7763568394003E-14
0.0009905894816824
-1.3766765505352E-14
0.00098960918518642
-0.00098960918517976
-1.3766765505352E-14
0.001978240012086
-0.00098863082691913
0.00098863082692002
0.00098765440128057
-0.0019762852281917
0.0029629651306204
0.001970443987263
-3.5971225997855E-14
0.00098376791016408
-0.00098376791016852
-3.5971225997855E-14
-0.0019704439873358
0.002954211897463
-0.00098376791016852
0.001966568972064
2.3536728122053E-14
0.0039215736532237
4.1744385725906E-14
0.00097799518794162
-3.5083047578155E-14
-0.0039177327289353
-3.3306690738755E-14
-3.3306690738755E-14
-3.3306690738755E-14
-0.00098183611223313
0.0029426210542236
-0.0019607849419745
-0.00098183611223313
2.3536728122053E-14
2.3536728122053E-14
0.00098183611222336
-0.00098183611223313
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
0.0019627091678234
-0.00098087305562533
0.0019607849419669
-0.0039254221160743
-0.0019685045726687
3.5527136788005E-15
3.5527136788005E-15
0.00098473666250376
0.0029484050842639
-0.00098183611223313
0.00098183611222336
-0.0029484050843331
-3.5971225997855E-14
-0.00098473666253618
-0.00098570732479608
-0.00098667990243717
0.00098667990240831
-0.00098667990243717
0.00098667990240831
-3.6859404417555E-14
0.002954211897463
3.1530333899354E-14
0.00098280106193149
2.3536728122053E-14
-0.00098280106187643
3.1530333899354E-14
-0.00098376791016852
0.0029484050842639
0.00098087305556671
0.00097991188637492
2.5757174171304E-14
-0.00097991188637447
-2.5313084961454E-14
-0.0019627091678251
0.0019627091678234
-2.5313084961454E-14
-0.00098087305562533
0.00098087305556671
-0.00098087305562533
-0.00098183611223313
2.3536728122053E-14
0.0029426210542236
2.5757174171304E-14
2.5757174171304E-14
2.5757174171304E-14
2.5757174171304E-14
-0.00097991188637447
0.00097991188637492
-0.0019607849419745
0.00098087305556671
-2.5313084961454E-14
-0.00098087305562533
0.00098087305556671
-0.0019627091678251
2.3536728122053E-14
-0.00098280106187643
3.1530333899354E-14
3.1530333899354E-14
-0.00098376791016852
-0.0019704439873358
0.003937012959363
0.0019627091678234
-0.00098087305562533
-0.0029484050843331
0.0029484050842639
-3.3306690738755E-14
-0.0019646371741331
3.1530333899354E-14
3.1530333899354E-14
0.0019646371741313
-0.00098183611223313
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
2.3536728122053E-14
0.0048995688411235
-3.5083047578155E-14
0.00097703964786477
3.8191672047105E-14
0.00097608597303811
0.00097513415818273
0.0019474202843766
-0.00097323608651889
-0.001949318356067
-1.7319479184152E-14
-1.7319479184152E-14
0.00097513415818273
-2.3536728122053E-14
0.00097418419787676
-0.001949318356067
0.001949318356083
-0.001949318356067
-0.0019531256209171
-3.5083047578155E-14
-3.5083047578155E-14
-3.5083047578155E-14
-0.00097799518793495
0.0019550348358415
0.00097608597303811
-1.7319479184152E-14
-0.0019531256209171
-0.00097799518793495
0.00097799518794162
-0.00097799518793495
-0.0009789525989583
0.0019569477869257
-0.00097799518793495
4.1744385725906E-14
4.1744385725906E-14
4.1744385725906E-14
4.1744385725906E-14
-0.0009789525989583
0.00097895259902581
4.1744385725906E-14
-0.0009789525989583
0.00097895259902581
4.1744385725906E-14
4.1744385725906E-14
-0.0009789525989583
2.5757174171304E-14
-0.00097991188637447
0.00097991188637492
2.5757174171304E-14
0.00097895259902581
-0.0009789525989583
-0.0019607849419745
-3.3306690738755E-14
0.00098087305556671
0.001958864485375
4.1744385725906E-14
0.0068259650704414
-0.00097228981895814
-0.004875680063519
-0.00097799518793495
4.1744385725906E-14
4.1744385725906E-14
0.0019550348358415
3.8191672047105E-14
0.0019512201312382
-2.3536728122053E-14
-0.00097513415822359
0.0029225544425828
-0.00097323608651889
0.0009732360865331
0.00097228981898079
4.1744385725906E-14
0.00097134538964205
-0.00097134538959009
4.1744385725906E-14
0.0019417481829418
-0.001941748182869
4.1744385725906E-14
0.0019417481829418
-0.00097040279326865
-0.00097134538959009
0.00097134538964205
0.00097040279330995
3.1086244689504E-14
-0.00097040279326865
0.0019398648178099
0.00096852307808337
-4.7073456244107E-14
-4.7073456244107E-14
-0.00096852307814732
-1.6875389974302E-14
-1.6875389974302E-14
-1.6875389974302E-14
0.00096852307808337
0.0019342365798529
-0.0019342365798778
-0.00096852307814732
-0.0019398648178166
0.0038759738447101
-0.00096758594878299
-4.7073456244107E-14
-0.0019379851026473
0.00096946202453108
0.0019361090268832
-0.0019361090268832
0.0029027596579834
2.2204460492503E-14
2.2204460492503E-14
-0.00096665063107793
0.00096665063111701
2.2204460492503E-14
-0.00096665063107793
1.6875389974302E-14
0.00096665063111701
-0.00096665063107793
0.0019323677510168
-0.0019323677510368
1.6875389974302E-14
0.00096665063111701
0.00096571711992199
-3.6859404417555E-14
0.0009647854100634
-0.00096478541013578
-0.0019323677510368
0.0019323677510168
-0.00096571711993665
2.2204460492503E-14
-0.00096665063107793
0.0019323677510168
0.0009647854100634
-0.00096478541013578
0.0009647854100634
-3.5527136788005E-14
-0.00096478541013578
-3.6859404417555E-14
0.0009647854100634
0.0009638554962641
0.00096292737335757
-0.00096292737343617
-4.2632564145606E-14
-0.0019286409064425
-3.6859404417555E-14
0.0009647854100634
0.0019267828696643
-3.5971225997855E-14
0.00096200103616395
-2.7089441800854E-14
0.001921230177873
-0.00096015369832081
0.00096015369832259
0.00095923268747899
-0.00095923268748077
-2.0872192862953E-14
-0.00096015369832081
2.2648549702353E-14

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'George Udny Yule' @ 72.249.76.132

\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 & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=90491&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]'George Udny Yule' @ 72.249.76.132[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=90491&T=0

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

As an alternative you can also use a QR Code:  
QR Code


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

Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'George Udny Yule' @ 72.249.76.132






Tukey Lambda - Key Values
Distribution (lambda)Correlation
Approx. Cauchy (lambda=-1)0.465319295473031
Exact Logistic (lambda=0)0.980115935391086
Approx. Normal (lambda=0.14)0.97483946481544
U-shaped (lambda=0.5)0.95195285236428
Exactly Uniform (lambda=1)0.93223980198956

\begin{tabular}{lllllllll}
\hline
Tukey Lambda - Key Values \tabularnewline
Distribution (lambda) & Correlation \tabularnewline
Approx. Cauchy (lambda=-1) & 0.465319295473031 \tabularnewline
Exact Logistic (lambda=0) & 0.980115935391086 \tabularnewline
Approx. Normal (lambda=0.14) & 0.97483946481544 \tabularnewline
U-shaped (lambda=0.5) & 0.95195285236428 \tabularnewline
Exactly Uniform (lambda=1) & 0.93223980198956 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=90491&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.465319295473031[/C][/ROW]
[ROW][C]Exact Logistic (lambda=0)[/C][C]0.980115935391086[/C][/ROW]
[ROW][C]Approx. Normal (lambda=0.14)[/C][C]0.97483946481544[/C][/ROW]
[ROW][C]U-shaped (lambda=0.5)[/C][C]0.95195285236428[/C][/ROW]
[ROW][C]Exactly Uniform (lambda=1)[/C][C]0.93223980198956[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=90491&T=1

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

As an alternative you can also use a QR Code:  
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.465319295473031
Exact Logistic (lambda=0)0.980115935391086
Approx. Normal (lambda=0.14)0.97483946481544
U-shaped (lambda=0.5)0.95195285236428
Exactly Uniform (lambda=1)0.93223980198956


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
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')