R version 2.15.1 (2012-06-22) -- "Roasted Marshmallows"
Copyright (C) 2012 The R Foundation for Statistical Computing
ISBN 3-900051-07-0
Platform: i686-pc-linux-gnu (32-bit)

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(Drug,Placebo,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.2,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.2,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.3,69.66,71.76,71.12,70.28,70.6,69.77,70.09,70.37,70.55,71.7,71.63,70.85,69.3,71.07),dim=c(2,31),dimnames=list(c('Drug','Placebo'),1:31))
Error in as.vector(data) : object 'Drug' not found
Calls: array -> as.vector
Execution halted