For the below code, I used this file unfortunately, I got an interger overflow. I followed this instructions
> spec1_25 <- read.table("spec1_25mer.histo")
> plot(spec1_25[5:200,],type="l")
> points(spec1_25[16:200,])
> sum(as.numeric(spec1_25[16:10000,1]*spec1_25[16:10000,2]))
[1] NA
Warning message:
In spec1_25[16:10000, 1] * spec1_25[16:10000, 2] :
NAs produced by integer overflow
What did I do wrong?