Hi Gang,
I'm still getting the error below. Any thoughts?
Best,
Matt
> if (length(grep('tlrc', Model[1, "InputFile"]))==1) outView <- "tlrc"
> if (length(grep('orig', Model[1, "InputFile"]))==1) outView <- "orig"
>
>
> # initialization
> IData <- array(data=NA, dim=c(dimx, dimy, dimz, NoFile))
>
> IData[,,,1] <- Data$brk
Error in IData[, , , 1] <- Data$brk :
number of items to replace is not a multiple of replacement length
Execution halted