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(94.6,0,1,0,0,0,95.9,1,0,1,0,0,104.7,1,0,0,1,0,102.8,1,0,0,0,1,98.1,1,0,0,0,0,113.9,1,0,0,0,0,80.9,1,0,0,0,0,95.7,1,0,0,0,0,113.2,1,0,0,0,0,105.9,1,0,0,0,0,108.8,0,0,0,0,0,102.3,0,0,0,0,0,99,1,1,0,0,0,100.7,1,0,1,0,0,115.5,0,0,0,1,0,100.7,1,0,0,0,1,109.9,1,0,0,0,0,114.6,0,0,0,0,0,85.4,1,0,0,0,0,100.5,1,0,0,0,0,114.8,0,0,0,0,0,116.5,0,0,0,0,0,112.9,1,0,0,0,0,102,1,0,0,0,0,106,0,1,0,0,0,105.3,1,0,1,0,0,118.8,1,0,0,1,0,106.1,1,0,0,0,1,109.3,0,0,0,0,0,117.2,0,0,0,0,0,92.5,1,0,0,0,0,104.2,0,0,0,0,0,112.5,1,0,0,0,0,122.4,1,0,0,0,0,113.3,1,0,0,0,0,100,1,0,0,0,0,110.7,1,1,0,0,0,112.8,1,0,1,0,0,109.8,1,0,0,1,0,117.3,1,0,0,0,1,109.1,1,0,0,0,0,115.9,1,0,0,0,0,96,1,0,0,0,0,99.8,0,0,0,0,0,116.8,1,0,0,0,0,115.7,0,0,0,0,0,99.4,0,0,0,0,0,94.3,0,0,0,0,0,91,1,1,0,0,0,93.2,1,0,1,0,0,103.1,0,0,0,1,0,94.1,1,0,0,0,1,91.8,0,0,0,0,0,102.7,0,0,0,0,0,82.6,0,0,0,0,0,89.1,1,0,0,0,0),dim=c(6,56),dimnames=list(c('Y','X','','','1','','','2','','','3','','','4'),1:56))
Error in dimnames(data) <- dimnames : 
  length of 'dimnames' [1] not equal to array extent
Calls: array
Execution halted