我试图解决这个问题:
我们定义称为(p.q)数字的对象。在R中,(p,q)数字是具有四个元素的列表。列表的第一个元素是整数+ 1 + 1或整数-1-1。它给出了数字的符号。第二和第三个元素是p和q,每个都是非负整数。第四个元素是0到9之间的p + q + 1个整数的向量。
编写一个函数,它接受四个参数sign,p,q和nums。然后检查参数是否满足(p,q)数的所有要求。如果没有,请停止并显示错误消息。如果是,请使用structure()函数将(p.q)数字作为具有属性pqNumber的列表返回。
到目前为止,这是我的代码。我不确定错误或我需要做什么。
`pqNumber <- function(sign, p, q, nums) {
nums <- c()
if (sign != 1 && sign != -1) stop ("sign must be 1 or -1")
if (round != p) stop ("p must be an integer")
if (round != q) stop ("q must be an integer")
if (p < 0) stop ("p cannot be negative")
if (q < 0) stop ("q cannot be negative")
if (length(nums) != p + q + 1) stop ("nums must be a vector of p+q+1 integers")
structure(list(sign = sign, p = p, q = q, nums = nums), class = "pqNumber")
}`