Free Statistics

of Irreproducible Research!

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 computationMon, 02 Nov 2009 23:14:51 +0100
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Nov/02/t12572001441sa1l77e9xxckrw.htm/, Retrieved Sat, 27 Apr 2024 05:49:52 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=53043, Retrieved Sat, 27 Apr 2024 05:49:52 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact509
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Tukey lambda PPCC Plot] [3/11/2009] [2009-11-02 22:14:51] [d76b387543b13b5e3afd8ff9e5fdc89f] [Current]
-   PD    [Tukey lambda PPCC Plot] [] [2009-11-04 15:48:56] [8d2349dc1d6314bc274adc9ad027c980]
-   PD    [Tukey lambda PPCC Plot] [] [2009-11-04 15:52:56] [4d62210f0915d3a20cbf115865da7cd4]
- R PD    [Tukey lambda PPCC Plot] [PPCC plot] [2009-11-04 16:12:43] [757146c69eaf0537be37c7b0c18216d8]
-    D    [Tukey lambda PPCC Plot] [PPCC] [2009-11-04 19:36:47] [214e6e00abbde49700521a7ef1d30da2]
- RMPD    [Mean Plot] [Meanplot] [2009-11-04 19:38:56] [214e6e00abbde49700521a7ef1d30da2]
-    D    [Tukey lambda PPCC Plot] [ws 6 ppcc] [2009-11-04 23:07:13] [6e4e01d7eb22a9f33d58ebb35753a195]
-   PD    [Tukey lambda PPCC Plot] [Tukey Lambda PPCC...] [2009-11-05 10:46:47] [cd6314e7e707a6546bd4604c9d1f2b69]
-    D    [Tukey lambda PPCC Plot] [SHW WS6 - Tukey l...] [2009-11-05 10:51:13] [253127ae8da904b75450fbd69fe4eb21]
-    D      [Tukey lambda PPCC Plot] [Workshop 6] [2009-11-11 16:08:53] [78762f311bef5a0e45c439762ada383c]
-    D    [Tukey lambda PPCC Plot] [WS 6 Tukey lambda...] [2009-11-05 10:53:02] [b103a1dc147def8132c7f643ad8c8f84]
-    D      [Tukey lambda PPCC Plot] [Paper: Tukey lamb...] [2009-12-17 12:36:51] [b103a1dc147def8132c7f643ad8c8f84]
-    D    [Tukey lambda PPCC Plot] [PPCC Plot Tukey L...] [2009-11-05 12:16:45] [4395c69e961f9a13a0559fd2f0a72538]
-    D    [Tukey lambda PPCC Plot] [Workshop 6] [2009-11-05 12:59:04] [03557919bc1ce1475f4920f6a43c36b0]
-    D      [Tukey lambda PPCC Plot] [Workshop 6] [2009-11-05 13:05:38] [03557919bc1ce1475f4920f6a43c36b0]
-   PD    [Tukey lambda PPCC Plot] [Tukey Lambda PPCC...] [2009-11-05 14:10:05] [f5d341d4bbba73282fc6e80153a6d315]
-    D      [Tukey lambda PPCC Plot] [Tukey Lamba BDM] [2009-11-10 12:22:51] [f5d341d4bbba73282fc6e80153a6d315]
-             [Tukey lambda PPCC Plot] [tg15] [2009-11-10 14:44:02] [a21bac9c8d3d56fdec8be4e719e2c7ed]
- R             [Tukey lambda PPCC Plot] [ws6] [2009-11-15 22:42:09] [3fc64fd7a52ce121dfe13dba27bf6e5b]
-             [Tukey lambda PPCC Plot] [TVD 15] [2009-11-10 22:44:21] [42ad1186d39724f834063794eac7cea3]
-               [Tukey lambda PPCC Plot] [PA15] [2009-12-15 10:03:02] [a21bac9c8d3d56fdec8be4e719e2c7ed]
-   PD        [Tukey lambda PPCC Plot] [WS6 Tukey] [2009-11-13 19:37:41] [445b292c553470d9fed8bc2796fd3a00]
-    D          [Tukey lambda PPCC Plot] [WS6 Review] [2009-11-18 18:26:38] [445b292c553470d9fed8bc2796fd3a00]
-    D    [Tukey lambda PPCC Plot] [Shwws6v1] [2009-11-05 15:13:02] [5f89c040fdf1f8599c99d7f78a662321]
-    D    [Tukey lambda PPCC Plot] [Shwws6v1] [2009-11-05 15:13:10] [2b2cfeea2f5ac2a1bcb842baaf1415ef]
-    D    [Tukey lambda PPCC Plot] [WS 6] [2009-11-05 18:08:50] [eaf42bcf5162b5692bb3c7f9d4636222]
-    D      [Tukey lambda PPCC Plot] [Workshop 6: PPCC ...] [2009-11-06 11:54:57] [1433a524809eda02c3198b3ae6eebb69]
-   PD        [Tukey lambda PPCC Plot] [PPCC Tukey Lambda...] [2009-12-11 10:23:55] [1433a524809eda02c3198b3ae6eebb69]
- RM D      [Box-Cox Normality Plot] [Workshop 6: Box-c...] [2009-11-06 11:57:46] [1433a524809eda02c3198b3ae6eebb69]
- R         [Tukey lambda PPCC Plot] [Workshop 6: Analy...] [2009-11-11 14:33:00] [3cb427d596a5d2eb77fa64560dc91319]
-           [Tukey lambda PPCC Plot] [Workshop 6: Analy...] [2009-11-11 14:34:43] [3cb427d596a5d2eb77fa64560dc91319]
-    D      [Tukey lambda PPCC Plot] [] [2009-11-13 15:18:59] [09f192433169b2c787c4a71fde86e883]
-    D    [Tukey lambda PPCC Plot] [Shw6: PPCC Tukey-...] [2009-11-05 20:44:36] [3c8b83428ce260cd44df892bb7619588]
- R PD    [Tukey lambda PPCC Plot] [] [2009-11-05 21:16:34] [1f74ef2f756548f1f3a7b6136ea56d7f]
-    D    [Tukey lambda PPCC Plot] [t l] [2009-11-06 08:46:13] [315ba876df544ad397193b5931d5f354]
-           [Tukey lambda PPCC Plot] [Paper] [2009-12-10 16:29:52] [3e19a07d230ba260a720e0e03e0f40f2]
-    D    [Tukey lambda PPCC Plot] [] [2009-11-06 10:59:56] [74be16979710d4c4e7c6647856088456]
-    D    [Tukey lambda PPCC Plot] [PPCC Plot - Turke...] [2009-11-07 09:35:57] [3b0db66ac8145b1be856a517e2900332]
-    D    [Tukey lambda PPCC Plot] [ws 6] [2009-11-07 14:24:16] [b5908418e3090fddbd22f5f0f774653d]
-    D    [Tukey lambda PPCC Plot] [WS 6: PPCC Plot -...] [2009-11-07 16:15:34] [8cf9233b7464ea02e32be3b30fdac052]
-   P       [Tukey lambda PPCC Plot] [WS 6: PPCC Tukey ...] [2009-11-12 17:18:44] [b97b96148b0223bc16666763988dc147]
-    D    [Tukey lambda PPCC Plot] [SHWWS6link12] [2009-11-08 12:31:54] [a66d3a79ef9e5308cd94a469bc5ca464]
-    D    [Tukey lambda PPCC Plot] [Workshop 6 Tukey ...] [2009-11-08 14:29:28] [f924a0adda9c1905a1ba8f1c751261ff]
-    D    [Tukey lambda PPCC Plot] [PPCC Tukey Lambda...] [2009-11-08 14:54:47] [d46757a0a8c9b00540ab7e7e0c34bfc4]
-    D    [Tukey lambda PPCC Plot] [] [2009-11-08 15:47:41] [7369a9baefff1ba9d2171738b4c9faa6]
-   PD    [Tukey lambda PPCC Plot] [] [2009-11-08 16:25:02] [cf890101a20378422561610e0d41fd9c]
-    D    [Tukey lambda PPCC Plot] [PPCC Plot - Tukey...] [2009-11-08 17:18:14] [e2a6b1b31bd881219e1879835b4c60d0]
-   PD    [Tukey lambda PPCC Plot] [Tukey Lambda PPCC...] [2009-11-09 08:52:01] [2f74b736c031245eb7b9a6567f4b8492]
-   PD    [Tukey lambda PPCC Plot] [WS 6 PPCC Tukey-l...] [2009-11-09 10:43:17] [83058a88a37d754675a5cd22dab372fc]

[Truncated]
Feedback Forum

Post a new message
Dataseries X:
109.20
88.60
94.30
98.30
86.40
80.60
104.10
108.20
93.40
71.90
94.10
94.90
96.40
91.10
84.40
86.40
88.00
75.10
109.70
103.00
82.10
68.00
96.40
94.30
90.00
88.00
76.10
82.50
81.40
66.50
97.20
94.10
80.70
70.50
87.80
89.50
99.60
84.20
75.10
92.00
80.80
73.10
99.80
90.00
83.10
72.40
78.80
87.30
91.00
80.10
73.60
86.40
74.50
71.20
92.40
81.50
85.30
69.90
84.20
90.70
100.30




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 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 & 2 seconds \tabularnewline
R Server & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=53043&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]2 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=53043&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=53043&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 Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'George Udny Yule' @ 72.249.76.132







Tukey Lambda - Key Values
Distribution (lambda)Correlation
Approx. Cauchy (lambda=-1)0.664010722560245
Exact Logistic (lambda=0)0.986871668312688
Approx. Normal (lambda=0.14)0.993978461189783
U-shaped (lambda=0.5)0.994142337640836
Exactly Uniform (lambda=1)0.986461326389092

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=53043&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.664010722560245
Exact Logistic (lambda=0)0.986871668312688
Approx. Normal (lambda=0.14)0.993978461189783
U-shaped (lambda=0.5)0.994142337640836
Exactly Uniform (lambda=1)0.986461326389092



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')