考虑以下功能：
Base myYears = JsonConvert.DeserializeObject<Base>(myJsonString);
是否有更好的方法，而不是键入多个if语句将每个（可能的）向量tmp_fn <- function(a, x, y, z){
if (is.vector(x)) x <- matrix(x, nrow = 1)
if (is.vector(y)) y <- matrix(y, nrow = 1)
if (is.vector(z)) z <- matrix(z, nrow = 1)
... do other stuff
}
转换为行向量。或者更一般地，将相同的函数应用于调用函数时传递给函数的参数的子集？