[R] Error:'subscript out of bounds'

[Sarah Goslee]

You don't provide a reproducible example - what does your data look like?

If this were my problem, I would start by working through the function
step by step with one of my files

data <- filelist[[1]]

dataodd <- data[-(1:18),]
and so on, examining the result at every step with tools like dim() and str()
until I found the problem.

There are more fully-developed debugging tools available, but for such
a short function I wouldn't bother.

Sarah

On Tue, Jul 12, 2016 at 9:29 AM, Samsad Afrin Himi
<samsad.afrin at gmail.com> wrote:
> Dear R-team,
>
> I have written this code for calculation my data file. But there shows 'subscript out of bounds’.
>
>
>
>> computeResponse <- function(data){
> +     dataodd <- data[-(1:18),]
> +     dataodd <- dataodd[seq(1,nrow(dataodd), 2),]
> +     hitsodd <- table(factor(dataodd[,5]), factor(dataodd[,15]))[2,2]
> +     missesodd <- table(factor(dataodd[,5]), factor(dataodd[,15]))[2,1]
> +     crejectionsodd <- table(factor(dataodd[,5]), factor(dataodd[,15]))[1,2]
> +     falsealarmodd <- table(factor(dataodd[,5]), factor(dataodd[,15]))[1,1]
> +     return(coordinationodd <- data.frame(hitsodd, missesodd,crejectionsodd, falsealarmodd))
> + }
>>
>> filenames <- list.files(full.names=TRUE)
>> filelist <- lapply(filenames, read.table, fill = TRUE, header = FALSE, sep = "\t")
>> coordinationodd <- lapply(filelist, computeResponse)
> Error in table(factor(dataodd[, 5]), factor(dataodd[, 15]))[2, 2] :
>   subscript out of bounds
>> coordinationodd <- Reduce(rbind, coordinationodd)
> Error in Reduce(rbind, coordinationodd) :
>   object 'coordinationodd' not found
>
>
> Could you please tell me how I can fix this problem?
>
> Best,
> Samsad
>         [[alternative HTML version deleted]]
>