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(1.6,-41,1.8,55,5.2,30,4.1,0,0.4,17,2.7,-61,2.4,27,2.6,1,2.4,-67,7.2,80,3.7,-70,8.4,41,1.5,-37,8.0,0,0.0,7,7.1,-50,2.8,74,8.2,79,2.3,56,5.0,18,5.9,4,6.2,15,3.6,69,1.6,-6,3.2,32,2.6,57,1.6,59,5.8,68,2.8,-39,1.2,8,-1.5,-349,7.8,169,2.5,51,9.6,43,7.4,58),dim=c(2,35),dimnames=list(c('X','Y'),1:35))
>  y <- array(NA,dim=c(2,35),dimnames=list(c('X','Y'),1:35))
>  for (i in 1:dim(x)[1])
+  {
+  	for (j in 1:dim(x)[2])
+  	{
+  		y[i,j] <- as.numeric(x[i,j])
+  	}
+  }
> par3 = 'TRUE'
> par2 = '1'
> par1 = '2'
> ylab = 'Y Variable Name'
> xlab = 'X Variable Name'
> main = 'Title Goes Here'
> par3 <- 'TRUE'
> par2 <- '1'
> par1 <- '2'
> #'GNU S' R Code compiled by R2WASP v# 1#0#44 ##
> #Author: Dr# Ian E# Holliday
> #To cite this work: Ian E# Holliday, 2009, YOUR SOFTWARE TITLE #vNUMBER# in Free Statistics Software #v$_version#, Office for Research Development and Education, URL http://www#wessa#net/rwasp_YOURPAGE#wasp/
> #Source of accompanying publication: 
> #Technical description: 
> cat1 <- as#numeric#par1# #
> cat2<- as#numeric#par2# #
> intercept<-as#logical#par3#
> x <- t#x#
> xdf<-data#frame#t#y##
> #V1<-dimna#es#y###1###cat1##
> #V2<-dimna#es#y###1###cat2##
> xdf <- data#frame#xdf##cat1##, xdf##cat2###
> na#es#xdf#<-c#'Y', 'X'#
Error: object 'na' not found
Execution halted