Hola a todos,
Estoy haciendo un package y resulta que un bucle foreach, me da el error
de subscript out of bounds, cuando le incluyo dentro del package el import
de las librerias
@ importFrom stats dist filter
Pero si no le incluyo el import, entonces el bucle funciona correctamente.
el problema es que si no le incluyo el importfrom correspondiente de esas
librerias, entonces al chequear el pakcage salen NOTES de que seria bueno
incluirlas.
Y en este punto, estoy perdido por mas que leo el bucle, a ver si alguien
me da luz en esta oscuridad en la que me encuentro.
Muchas gracias a todos, un saludo cordial
les incluyo el bucle:
results1 <- foreach(i=1:rr, .combine = "c",
.packages=c("foreach", "irr",
"magrittr", "stats", "dplyr")) %dopar% {
smc <- sum(data3[i,1:rr]==max(data3[i,1:rr]))
RECEPTOR <- as.data.frame(matrix(0, ncol=2, nrow = smc))
EMISOR <- data2[i,1]
RECEPTOR[,1] <- data2[which(as.vector(data3[i,])==max(data3[i,])),1] #
cluster receptores con mayor coincidencia
for (y in smc) {
RECEPTOR[y,2] <- data1[1:numvar+1] %>%
filter(data1$Clus.Multi.OPTIMO
%in% c(EMISOR,RECEPTOR[y,1])) %>%
head() %>% kappam.fleiss() %$% value + 1
}
data4[i,1] <- as.numeric(which(data2[,1]
=RECEPTOR[which.max(RECEPTOR[,2]),1]))[1]
}
[[alternative HTML version deleted]]