Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software ModuleRscript (source code is shown below)
Title produced by softwareR console
Date of computationSat, 22 Aug 2009 04:00:42 -0600
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/Aug/22/t1250935244gawnzodkk7mqiwk.htm/, Retrieved Fri, 03 May 2024 07:51:35 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=42970, Retrieved Fri, 03 May 2024 07:51:35 +0000
QR Codes:

Original text written by user:This example is used in the manual files of the RC package.
IsPrivate?No (this computation is public)
User-defined keywordsblogtest
Estimated Impact237
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [R console] [correlation test] [2009-08-22 10:00:42] [256f657a32c6b2b7628dddcfa9a822d0] [Current]
Feedback Forum

Post a new message
Dataseries X:
-1.09810108611744	-0.189527109460563
0.411637718476761	1.51724199516497
-1.81978380952616	0.0445388831738316
-0.221295011732731	1.75421836427935
0.886170314101806	0.645527562439623
0.877486216387707	0.652623087968447
-0.120262042179671	-0.53995017433775
0.322389116068211	-0.224671622521451
-1.21519669398575	0.589511545079891
0.965450923409005	0.836574640812792
2.88458727835483	0.488950553441741
1.8085178262	-1.53063589745006
-1.57389524981970	0.213886362774563
0.606806747061263	0.98759965623051
-0.247130077425375	-0.986070448067616
-1.59485065599503	0.052742210631368
-1.02694633659613	-0.242428235919929
0.376317301323718	0.0199824076393307
-0.85574593783306	-1.22755419816088
-0.364399477124172	-0.511405526593713
0.131035178028096	0.353650756593185
-1.90409376600406	0.146042734427345
0.857531431590424	1.30638494175706
1.29904201708063	-0.926818444326453
-0.299229278528072	0.222819593011390
0.544342714546107	1.20068002086868
2.08391195814492	-0.037703647496876
0.401158649178917	-1.28354779671469
-0.390708554330372	0.78487154072008
0.64250041371431	-0.174137363722443
-0.236889967126192	-1.25342335259812
2.30709836370194	-1.24221846518926
0.348787265852152	-0.155579011641008
0.275872070865873	-0.992147747180489
-0.504278731422774	1.89790473306541
0.838017473905744	-1.93630804996099
-0.600342989035527	0.0438855010763694
1.92792252845804	0.0352851161824769
-1.01128122353643	0.0784722385885222
2.36894371968016	-1.73254551036171
-1.15162846295889	2.61120605430408
-1.09728925611801	-0.408271078707764
0.149623313657257	-1.52588182521685
-0.822493110512286	0.413692500069733
-0.524997318463012	0.839958141557784
-0.378368188603689	-0.381804321245045
-0.442092092143585	0.156206662712548
-0.450854961610048	-0.971918360642858
-1.2784212477901	0.72562435680177
0.930446098582843	0.40040746512944
> title = 'my title'


> {
+     plot(RCx$X1, RCx$X2, main = title)
+     res <- cor.test(RCx$X1, RCx$X2)
+     print(res)
+ }

	Pearson's product-moment correlation

data:  RCx$X1 and RCx$X2 
t = -1.5451, df = 48, p-value = 0.1289
alternative hypothesis: true correlation is not equal to 0 
95 percent confidence interval:
 -0.46768433  0.06458799 
sample estimates:
       cor 
-0.2176730 


Parameters (Session):
par1 = 'mytitle' ;
Parameters (R input):
R code (body of R function):
{

plot(x$X1, x$X2, main = par1)

res <- cor.test(x$X1, x$X2)
print(res)
}