The R Project SVN R

Rev

Rev 80516 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 80516 Rev 80850
Line 1... Line 1...
1 
 
 1 
 
2 
R Under development (unstable) (2021-06-17 r80510) -- "Unsuffered Consequences"
 2 
R Under development (unstable) (2021-08-25 r80818) -- "Unsuffered Consequences"
3 
Copyright (C) 2021 The R Foundation for Statistical Computing
 3 
Copyright (C) 2021 The R Foundation for Statistical Computing
4 
Platform: x86_64-pc-linux-gnu (64-bit)
 4 
Platform: x86_64-pc-linux-gnu (64-bit)
5 
 
 5 
 
6 
R is free software and comes with ABSOLUTELY NO WARRANTY.
 6 
R is free software and comes with ABSOLUTELY NO WARRANTY.
7 
You are welcome to redistribute it under certain conditions.
 7 
You are welcome to redistribute it under certain conditions.
Line 2899... Line 2899...
2899 
 
 2899 
 
2900 
	Paired t-test
 2900 
	Paired t-test
2901 
 
 2901 
 
2902 
data:  extra[group == 1] and extra[group == 2]
 2902 
data:  extra[group == 1] and extra[group == 2]
2903 
t = -4.0621, df = 9, p-value = 0.002833
 2903 
t = -4.0621, df = 9, p-value = 0.002833
2904 
alternative hypothesis: true difference in means is not equal to 0
 2904 
alternative hypothesis: true mean difference is not equal to 0
2905 
95 percent confidence interval:
 2905 
95 percent confidence interval:
2906 
 -2.4598858 -0.7001142
 2906 
 -2.4598858 -0.7001142
2907 
sample estimates:
 2907 
sample estimates:
2908 
mean of the differences
2908 
mean difference
2909 
                  -1.58
2909 
          -1.58
2910 
 
 2910 
 
2911 
>
2911 
>
2912 
> ## The sleep *prolongations*
 2912 
> ## The sleep *prolongations*
2913 
> sleep1 <- with(sleep, extra[group == 2] - extra[group == 1])
 2913 
> sleep1 <- with(sleep, extra[group == 2] - extra[group == 1])
2914 
> summary(sleep1)
 2914 
> summary(sleep1)
Line 3510... Line 3510...
3510 
> ### * <FOOTER>
 3510 
> ### * <FOOTER>
3511 
> ###
 3511 
> ###
3512 
> cleanEx()
 3512 
> cleanEx()
3513 
> options(digits = 7L)
 3513 
> options(digits = 7L)
3514 
> base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
 3514 
> base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
3515 
Time elapsed:  2.93 0.056 3 0 0
3515 
Time elapsed:  1.939 0.028 1.966 0 0
3516 
> grDevices::dev.off()
 3516 
> grDevices::dev.off()
3517 
null device
3517 
null device
3518 
          1
3518 
          1
3519 
> ###
 3519 
> ###
3520 
> ### Local variables: ***
 3520 
> ### Local variables: ***