R version 2.11.1 (2010-05-31)
Copyright (C) 2010 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(11,20,21,21,8,4,28,19,23,4,10,24,25,27,4,13,27,17,27,4,11,23,20,22,8,24,28,22,28,4,5,27,21,27,4,5,19,17,16,4,13,28,17,24,4,9,11,22,20,4,17,25,25,22,4,12,20,15,20,10,7,20,22,24,4,16,24,21,19,8,14,25,16,23,4,24,28,28,27,4,18,24,22,21,5,12,21,21,19,4,9,22,12,19,5,8,20,25,26,12,10,20,24,28,9,19,23,24,24,4,4,21,25,24,4,19,12,25,25,5,11,23,26,16,4,11,28,22,25,4,24,24,24,24,6,17,24,17,23,4,18,25,20,26,4,12,21,15,22,5,16,26,24,25,5,23,28,26,27,4,7,21,21,12,4,10,27,25,15,4,17,22,23,21,8,21,23,28,24,4,19,24,18,19,4,13,22,21,21,4,12,23,21,21,4,22,25,23,24,7,5,21,15,18,4,14,22,23,19,4,12,20,21,18,8,12,21,10,23,5,6,19,21,20,5,17,26,18,25,5,15,20,19,21,4,17,22,22,22,4,22,23,24,22,7,9,22,15,20,10,13,24,18,23,4,20,23,26,25,5,12,23,21,25,7,20,27,23,26,4,18,21,16,20,4,13,23,22,26,8,15,25,16,21,6,18,23,19,22,4,18,22,20,16,9,12,28,25,25,4,16,28,21,23,4,16,20,21,21,5,13,18,16,16,4),dim=c(5,63),dimnames=list(c('I1','I2','I3','E1','E2','E3','A'),1:63))
Error in dimnames(data) <- dimnames : 
  length of 'dimnames' [1] not equal to array extent
Calls: array
Execution halted