我有一个5个半径的数字向量。如果我函数中的一个参数='AC',我编写了以下函数来计算圆的面积。我想编写一个循环,使用我的函数在数字向量中使用半径计算圆的面积并打印结果。我如何在R中解决我的问题?
功能:
area.volume =function(var1,R) {
if (toupper(var1)=='AC') {
pi*R^2
} else if (toupper(var1)=='CC') {
4/3*pi*R
} else if (toupper(var1)=='VS') {
4*pi*R^2
} else print("your method is not supported")
}
半径矢量:c(20,10,4,34)
我希望我的函数循环遍历向量并使用以下行计算:
if (toupper(var1)=='AC'){ pi*R^2 }
。
答案 0 :(得分:1)
您的功能已通过矢量化符合您的规范:
for