我试图重现在R中的Python中创建的以下函数。
# Python
def square_area(side):
return side * side
results = []
for i in range(1, 10):
x = square_area(i)
results.append(x)
print results
结果
[1, 4, 9, 16, 25, 36, 49, 64, 81]
我在R中的尝试是:
# R
square_area <- function(side) {
side * side
}
results=list()
for (i in 1:10){
x <- square_area(i)
results[i] = x
}
print(results)
结果
[[1]]
[1] 1
[[2]]
[1] 4
[[3]]
[1] 9
[[4]]
[1] 16
[[5]]
[1] 25
[[6]]
[1] 36
[[7]]
[1] 49
[[8]]
[1] 64
[[9]]
[1] 81
[[10]]
[1] 100
我不知道这是否正确,但是我需要结果作为列表,以便以后在折线图上构建。这看起来更像是带有键和值的python字典。您如何简单地在R中附加值?
谢谢。
我们可以通过^
在vector
(1:10)^2
#[1] 1 4 9 16 25 36 49 64 81 100
如果您需要一个list
,只需将其包装as.list
as.list((1:10)^2)
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句