如何将R中的有序变量转换（计算）为二分法变量？

我想将一个有序变量（0-2）——其中0表示无权限，1表示某些权限，2表示完全权限——转换为二分变量

原始序数变量针对每个国家和年份（国家/年单位）进行编码

我想创建一个二分法变量（我们称之为改进），记录每个国家每年的所有积极变化。因此，当它从0变为1（或从0变为2，或从1变为0）时，我希望该年份和国家的值为1。否则为零

下面我给出了一个我的数据的示例。“RIGHTS”是原始序数变量。“我的二分法”变量是我想在R中计算的。我该怎么做

COUNTRY YEAR RIGHTS  MY DICHOTOMOUS
A        1990  0           0
A        1991  0           0
A        1992  0           0
A        1993  1           1 
A        1994  0           0
B        1990  1           1 
B        1991  1           0 
B        1992  1           0
B        1993  1           0
B        1994  1           0

---

请注意，原始数据也可能会消失，也就是说，它可能会变成负数。我不想为这个二分法变量编写负面更改的代码。

可能需要执行一系列

ifelse（）

语句。但我可能还是没读到你的问题。下面是一个例子

MY.DATA$MY.DICHOTOMOUS <- with(MY.DATA,ifelse(COUNTRY=="A",RIGHTS,ifelse(COUNTRY=="B"&YEAR==1990,1,factor(RIGHTS)))`

---

<代码>我的数据$My.diothOpthy

这假定你不考虑用1的权利作为1的二分之一：

x <- rights 
n <- length(x)
dichotomous <- c(0, as.numeric(x[-1] - x[-n] == 1))

---

x我们可以使用
diff

 df1$dichotomous <- +c(FALSE,diff(df1$RIGHTS)==1)
 df1$dichotomous
 #[1] 0 0 0 1 0 1 0 0 0 0

df1$dichotomous@akrun这在
+c
中做了什么？@762输出是一个逻辑向量
c（FALSE，diff（…）==1）
它可以用
as.integer
或
+/code>转换成二进制