为所有整数定义类别

Question

假设我想对正整数进行如下分组：

 int     cat
 1-3     0
 3-5     1
 5-7     2
  .      .
  .      .

在R中，您将如何做到这一点？如下所示的函数：

function1 <- function(n) {
   if n >= 1 && n <= 3 then cat = 0
   etc.
 }

这似乎很低效，因为您必须手动定义类别。

Answer 1

您可以尝试如下所示：

int <- 1:10
cat <- cut(int, seq(1, max(x)+1, 2), right=F)
cat_numeric <- as.numeric(cat) - 1

或者，如果您想要直接到达单个任意数的类别号，这样的函数可能工作得更好：

y<- function(x) (x+1)%/%2-1