我有以下两个示例数据集,并想将case_when函数用作两个数据集的组合:
game_data <- data.frame(player = c(1,1,1,2,2,2,3,3,3), level = c(1,2,3,1,2,3,1,2,3), score=c(0,150,170,80,100,110,75,100,0))
> game_data
player level score
1 1 1 0
2 1 2 150
3 1 3 170
4 2 1 80
5 2 2 100
6 2 3 110
7 3 1 75
8 3 2 100
9 3 3 0
>
> range_data <- data.frame(level = c(1,2,3), Point1 = c(20,70,140), Point2 = c(40,80,180), Point3 = c(60,90,220))
> range_data
level Point1 Point2 Point3
1 1 20 40 60
2 2 70 80 90
3 3 140 180 220
>
我现在想使用第二个数据集中的点之间的范围,根据得分之间的范围在game_data数据集中创建一个新变量。 例如,如果用户1的得分在150的2级中,则新变量PointRange的得分应高于90,因此应显示“ Range4”。
我尝试了以下操作,但不起作用:
result <- game_data %>%
mutate(PointRange = case_when(level == range_data$level & score < range_data$point1 ~ "Range1",
level == range_data$level & score >= range_data$point1 & score < data$point2 ~ "Range2",
level == range_data$level & score >= range_data$point2 & score <= data$point3 ~ "Range3",
level == range_data$level & score >= range_data$point3 ~ "Range4"))
我该如何管理?预先感谢!
答案 0 :(得分:1)
由于您在级别列上进行匹配,因此您可以简单地<?xml version="1.0" encoding="utf-8"?>
<manifest xmlns:android="http://schemas.android.com/apk/res/android"
package="com.mob.wunderin.oapp">
<uses-permission android:name="android.permission.INTERNET" />
<application
android:allowBackup="true"
android:icon="@mipmap/ic_launcher"
android:label="@string/app_name"
android:roundIcon="@mipmap/ic_launcher_round"
android:supportsRtl="true"
android:theme="@style/AppTheme">
<activity android:name=".MainActivity">
<intent-filter>
<action android:name="android.intent.action.MAIN" />
<category android:name="android.intent.category.LAUNCHER" />
</intent-filter>
</activity>
</application>
</manifest>
对该列进行操作,然后从单个数据框中进行操作。
参数是按顺序计算的,因此您必须从最具体到最一般。
inner_join