Question

我仍然处理R并且已经设定了专门编写函数的任务，其中x和y是向量：

x <- c(3,7,9) 
y <- 20

...然后所有x和x的倍数小于y需要以矢量的形式输出，例如：

v1 <- c(3,6,7,9,12,14,15,18)

但是在函数中，它需要总结向量v1 - (3+6+...+15+18)中的所有数字。

我已经开始了，但是如果有其他声明我就永远无法理解，所以有人可以帮助我解释所以我知道以备将来参考吗？

Answer 1

这是一个使用基本循环和if中的if分支的例子。

x <- c(3,7,9)
y1 <- 20
v1 <- numeric()
for(i in x){
    nex <- i
    counter <- 1
    repeat{
        if(!(nex %in% v1)){
            v1 <- c(v1, nex)
        }
        counter <- counter + 1
        nex <- i*counter
        if(nex >= y1){
            break
        }
    }
}
v1 <- sort(v1)
v1.sum <- sum(v1)

v1 
## 3  6  7  9 12 14 15 18
v1.sum
## 84

Answer 2

不需要循环。计算每个for line in csv_reader: time = dt.datetime.strptime(line[0], '%H:%M') if time.minute % 5 == 0: xticks.append(line[0]) else: xticks.append("") x.append(time) y.append(str(line[1]))值进入CREATE TABLE STUDENT_REGISTER ( SNO INT NOT NULL , STUDENT_ID AS 'T'+CAST( SNO AS VARCHAR(10)) PERSISTED PRIMARY KEY, FIRST_NAME VARCHAR(20), LAST_NAME VARCHAR(20), DATE_OF_BIRTH DATE, ADDRESS VARCHAR(100), MOBILE_NO BIGINT )的次数，然后生成唯一数字列表：

具有循环和功能的功能R中的倍数

2 个答案: