小编use*_*177的帖子

我对R有点问题,我不知道为什么.它告诉我这一行:if(temp > data[[k]][[k2]]) {参数长度为0.这里的块不是那么大:

for(k in 1:length(data)) { 
      temp <- 0
      for(k2 in 3:length(data[[k]])) {
           print(data[[k]][[k2]])
           if(temp > data[[k]][[k2]]) {
                temp <- data[[k]][[k2]]
            }
            fMax[k] <- temp
           k2 <- k2 + 1
      }
 k <- k + 1
 }

数据[[k]] [[k2]]中的内容示例:

[1] "3050"
[1] "3051"
[1] "3054"
[1] "3054"
[1] "3052"
[1] "3053"
[1] "3059"
[1] "3059"
[1] "3057"
[1] "3060"
[1] "3063"
[1] "3060"
[1] "3068"
[1] "3067"
[1] "3079"
[1] "3085"
[1] "3094"
[1] "3107"
[1] …

说我有一个功能,我发现这样的二阶导数:

xyr <- D(expression(14252/(1+exp((-1/274.5315)*(x-893)))), 'x')

D2 <- D(xyr, 'x')

它让我回归,类型'语言':

-(14252 * (exp((-1/274.5315) * (x - 893)) * (-1/274.5315) * (-1/274.5315))/(1 + 
    exp((-1/274.5315) * (x - 893)))^2 - 14252 * (exp((-1/274.5315) * 
    (x - 893)) * (-1/274.5315)) * (2 * (exp((-1/274.5315) * (x - 
    893)) * (-1/274.5315) * (1 + exp((-1/274.5315) * (x - 893)))))/((1 + 
    exp((-1/274.5315) * (x - 893)))^2)^2)

我如何找到等于0的位置？