создать новый dataframe из недостающих значений

Question

Рассмотрим вектор х:

x <- c(0, 5, 10, 25, 30) 

Я хотел бы создать новый вектор с «отсутствующими значениями», что означает, что все значения, которые были «пропущены», если бы я иметь последовательность с интервалами 5.

таким образом, для данного примера, выходной shouldbe:

xna <- c(15, 20) 

Кроме того, я должен был бы сделать функцию, так что я могу сделать это в любой вектор х.

nats <- function(x){ 
    lastvalue <- x[length(x)] 
    firstvalue <-x[1] 
    xseq <- seq(firstvalue, lastvalue, 5) 
    for i in xseq { 
    # if x is not in x seq put it into a vecotr xna # 
    } 
xna 
} 

Я действительно не знаю, как это сделать. Был бы действительно оценен предложения или если есть уже функция, которая может это сделать.

Пожалуйста, помогите,

Answer 1

Solution в базе R (см ?setdiff)

# Your data 
x <- c(0, 5, 10, 25, 30) 

# Your sequence 
y <- seq(0, max(x), by = 5); 

# "Skipped" values 
s <- setdiff(y, x); 
print(s); 
[1] 15 20 

Answer 2

Использование %in% оператора. См https://stat.ethz.ch/R-manual/R-devel/library/base/html/match.html

xna <- xseq[!xseq%in%x] 

Answer 3

Если вам нужна как функция,

nats <- function(x, interval){ 
    lastvalue <- x[length(x)] 
    firstvalue <-x[1] 
    xseq <- seq(firstvalue, lastvalue, interval) 
    xna <- xseq[!xseq %in% x] 
    return(xna) 
} 

x <- c(0,5,10, 15,25,30) 
nats(x, 5) 
#[1] 20 
x <- c(3, 6,18) 
nats(x, 3) 
#[1] 9 12 15