在R中使用apply()

我正在尝试使用apply()函数通过“ respirometry”软件包中的conv_o2()计算局部压力。我有一个包含6列数据的数据框:日期,温度,氧气浓度,盐度,压力和分压。到目前为止,这是我尝试过的:

test_func <- function(y, temp, oxy, salinity, pressure) {

  return (conv_o2(o2 = oxy, 
                  from = "ml_per_l", to ="kPa", 
                  temp = temp, 
                  sal = salinity, 
                  atm_pres = pressure*100))
}
output  = apply(y, 1, test_func,  temp = y$temp, oxy = y$oxy.conc, salinity = y$salinity, pressure = y$pressure) 

输出大约是我想要的,但是对于10行数据,我不知道为什么它返回10x10矩阵:

enter image description here

谢谢!