R version 2.9.0 (2009-04-17)
Copyright (C) 2009 The R Foundation for Statistical Computing
ISBN 3-900051-07-0

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> x <- array(list(68.95,70.18,70.84,69.94,70.26,69.61,70.93,71.39,70.71,72.54,70.73,70.48,70.20,70.48,69.76,71.68,71.46,70.59,70.31,71.61,69.24,70.56,70.94,72.74,68.98,72.63,71.16,71.58,69.96,70.14,69.66,71.22,70.20,70.72,69.99,71.37,71.97,69.73,68.29,71.29,67.67,73.19,70.07,70.64,70.89,69.30,69.66,71.76,71.12,70.28,70.60,69.77,70.09,70.37,70.55,71.70,71.63,70.85,69.30,71.07),dim=c(2,30),dimnames=list(c('Placebo','Drug'),1:30))
>  y <- array(NA,dim=c(2,30),dimnames=list(c('Placebo','Drug'),1:30))
>  for (i in 1:dim(x)[1])
+  {
+  	for (j in 1:dim(x)[2])
+  	{
+  		y[i,j] <- as.numeric(x[i,j])
+  	}
+  }
> par8 = 'TRUE'
> par7 = '.95'
> par6 = '0.0'
> par5 = 'unpaired'
> par4 = 'T-Test'
> par3 = '2'
> par2 = '1'
> par1 = 'two.sided'
> ylab = 'Y-Axis Title'
> xlab = 'X-Axis Title'
> main = 'Boxplots Title'
> #'GNU S' R Code compiled by R2WASP v. 1.0.44 ##
> #Author: Dr. Ian E. Holliday
> #To cite this work: Ian E. Holliday, 2009, Aston University Statistical Software #vNUMBER# in Free Statistics Software #v$_version#, Office for Research Development and Education, URL http://www.wessa.net/rwasp_AUSS.wasp/
> #Source of accompanying publication: 
> #Technical description: 
> par2 <- as.numeric#par2#
> par3 <- as.numeric#par3#
> par4 <- as.character#par4#
> par5 <- as.character#par5#
> par6 <- as.numeric#par6#
> par7 <- as.numeric#par7#
> par8 <- as.logical#par8#
> if # par5 ## 'unpaired'# paired <- FALSE else paired <- TRUE
+ x <- t#y#
Error: unexpected symbol in:
"if # par5 ## 'unpaired'# paired <- FALSE else paired <- TRUE
x"
Execution halted