なぜこのエラーが発生し続けるのか理解できません
Error: unexpected symbol in:
" ans <- logver(theta)-logver(est)
return exp"
> }
Error: unexpected '}' in "}"
これは私のコードです:
n <- 27
sum <- 30 + 28 + 26 + 22 + 26 + 27 + 25 + 18 + 34 + 33 + 20 + 25 + 27 + 33 + 31 + 27 + 21 + 30 + 26 + 24 + 30 + 33 + 17 + 28 + 21 + 30 + 27
precision<-0.1 #precision de la rejilla
intervalo<-1 #parámetro del tamaño del intervalo a graficar
logver <- function (theta) {
return -27 * theta + log (theta) * sum
}
est<- sum / n;
VR <- function (theta) { #Verosimilitud Relativa (RV)
ans <- logver(theta)-logver(est)
return exp(ans)
}
ただし、「exp」関数呼び出しを削除すると正常に機能します。