我想制作一个使用for循环来计算向量的最小值和最大值的程序,这是我的代码
d <- c(34,67,123,554,76)
m<-0
e<-0
for(i in d) { if(d>i) { m<-d[i]
print("max")
} else if (d>i) { e<-d[i]
print("min")
}}
给我 [1]“最大” ...
怎么了?
答案 0 :(得分:0)
错误/警告的原因,您需要将m
和e
和i
与d
而不是完整向量# example input
d <- c(34,67,123,554,76)
foo <- function(x){
# some checks for input x
# ...
myMin <- x[1]
myMax <- x[1]
for(i in x[-1]) {
if(i < myMin) { myMin <- i}
if(i > myMax) { myMax <- i}
}
# return
c(Min = myMin, Max = myMax)
}
foo(d)
# Min Max
# 34 554
进行比较。
类似这样的东西:
{{1}}