r - data.table 在新列中粘贴值的方法以另一列中的值为条件-6ren

r - data.table 在新列中粘贴值的方法以另一列中的值为条件

转载作者：行者123 更新时间：2023-12-05 02:19:37

24

4

有人可以建议怎么做吗？我有这个数据:

ty<-data.table(id=c(1,1,1,2,2,3,3,4,4,5,5),
           date=c("11-23-2015","06-22-2015","07-22-2016","03-03-2012","11-08-2015","11-10-2012","11-23-2015","11-12-2012","12-02-2015","08-24-2016","12-25-2008"),
           event=c("open","gt","gf","gf","open","ff","open","open","close","tr","ww"))
ty$date<-as.Date(ty$date,format="%m-%d-%Y")

        id       date event
     1:  1 2015-11-23  open
     2:  1 2015-06-22    gt
     3:  1 2016-07-22    gf
     4:  2 2012-03-03    gf
     5:  2 2015-11-08  open
     6:  3 2012-11-10    ff
     7:  3 2015-11-23  open
     8:  4 2012-11-12  open
     9:  4 2015-12-02 close
    10:  5 2016-08-24    tr
    11:  5 2008-12-25    ww

我需要提取与事件“打开”相对应的日期并将其粘贴到按 id 索引的第四列中，如以下示例所示:

        id       date event open_date
 1:  1 2015-11-23  open      2015-11-23
 2:  1 2015-06-22    gt      2015-11-23
 3:  1 2016-07-22    gf      2015-11-23
 4:  2 2012-03-03    gf      2015-11-08
 5:  2 2015-11-08  open      2015-11-08
 6:  3 2012-11-10    ff      2015-11-23
 7:  3 2015-11-23  open      2015-11-23
 8:  4 2012-11-12  open      2012-11-12
 9:  4 2015-12-02 close      2012-11-12
10:  5 2016-08-24    tr      NA
11:  5 2008-12-25    ww      NA

我用过这个:

ty[, open_date := if (event == "open") paste(date), by=id]

但它只在引用行中粘贴日期，而我需要在所有 id 行中粘贴日期。可能不是最佳的，但这是我需要的。感谢和问候

最佳答案

将@Sotos 和@DavidArenburg 在社区维基答案中的评论中提供的解决方案转换:

# @Sotos' solution
ty[, open_date := date[event == 'open'], by = id]
# @DavidArenburg's solution:
ty[ty[event == "open"], open_date := i.date, on = .(id)]

两种方案的结果:

#     id       date event  open_date
#  1:  1 2015-11-23  open 2015-11-23
#  2:  1 2015-06-22    gt 2015-11-23
#  3:  1 2016-07-22    gf 2015-11-23
#  4:  2 2012-03-03    gf 2015-11-08
#  5:  2 2015-11-08  open 2015-11-08
#  6:  3 2012-11-10    ff 2015-11-23
#  7:  3 2015-11-23  open 2015-11-23
#  8:  4 2012-11-12  open 2012-11-12
#  9:  4 2015-12-02 close 2012-11-12
# 10:  5 2016-08-24    tr       <NA>
# 11:  5 2008-12-25    ww       <NA>

关于r - data.table 在新列中粘贴值的方法以另一列中的值为条件，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/42111429/

24

4

0

文章推荐： logstash - 如何替换 Logstash 中字段中的字符串

文章推荐： python - 在 docx 中按顺序处理对象

文章推荐： python-3.x - 如何将原点居中在 imshow() 图的中心

文章推荐： spotify - 使用 Spotify API 的最流行轨道列表

Ruby 方法() 方法
我想了解 Ruby 方法 methods() 是如何工作的。我尝试使用“ruby 方法”在 Google 上搜索，但这不是我需要的。我也看过 ruby-doc.org，但我没有找到这种方法。
VBS教程：方法-Test 方法
Test 方法对指定的字符串执行一个正则表达式搜索，并返回一个 Boolean 值指示是否找到匹配的模式。 object.Test(string) 参数 object 必选项。总是一个
VBS教程：方法-Replace 方法
Replace 方法替换在正则表达式查找中找到的文本。 object.Replace(string1, string2) 参数 object 必选项。总是一个 RegExp 对象的名称。
VBS教程：方法-Raise 方法
Raise 方法生成运行时错误 object.Raise(number, source, description, helpfile, helpcontext) 参数 object 应为
VBS教程：方法-Execute 方法
Execute 方法对指定的字符串执行正则表达式搜索。 object.Execute(string) 参数 object 必选项。总是一个 RegExp 对象的名称。 string
VBS教程：方法-Clear 方法
Clear 方法清除 Err 对象的所有属性设置。 object.Clear object 应为 Err 对象的名称。说明在错误处理后，使用 Clear 显式地清除 Err 对象。此
VBS教程：方法-CopyFile 方法
CopyFile 方法将一个或多个文件从某位置复制到另一位置。 object.CopyFile source, destination[, overwrite] 参数 object 必选
VBS教程：方法-Copy 方法
Copy 方法将指定的文件或文件夹从某位置复制到另一位置。 object.Copy destination[, overwrite] 参数 object 必选项。应为 File 或 F
VBS教程：方法-Close 方法
Close 方法关闭打开的 TextStream 文件。 object.Close object 应为 TextStream 对象的名称。说明下面例子举例说明如何使用 Close 方
VBS教程：方法-BuildPath 方法
BuildPath 方法向现有路径后添加名称。 object.BuildPath(path, name) 参数 object 必选项。应为 FileSystemObject 对象的名称
VBS教程：方法-GetFolder 方法
GetFolder 方法返回与指定的路径中某文件夹相应的 Folder 对象。 object.GetFolder(folderspec) 参数 object 必选项。应为 FileSy
VBS教程：方法-GetFileName 方法
GetFileName 方法返回指定路径（不是指定驱动器路径部分）的最后一个文件或文件夹。 object.GetFileName(pathspec) 参数 object 必选项。应为
VBS教程：方法-GetFile 方法
GetFile 方法返回与指定路径中某文件相应的 File 对象。 object.GetFile(filespec) 参数 object 必选项。应为 FileSystemObject
VBS教程：方法-GetExtensionName 方法
GetExtensionName 方法返回字符串，该字符串包含路径最后一个组成部分的扩展名。 object.GetExtensionName(path) 参数 object 必选项。应
VBS教程：方法-GetDriveName 方法
GetDriveName 方法返回包含指定路径中驱动器名的字符串。 object.GetDriveName(path) 参数 object 必选项。应为 FileSystemObjec
VBS教程：方法-GetDrive 方法
GetDrive 方法返回与指定的路径中驱动器相对应的 Drive 对象。 object.GetDrive drivespec 参数 object 必选项。应为 FileSystemO
VBS教程：方法-GetBaseName 方法
GetBaseName 方法返回字符串，其中包含文件的基本名 (不带扩展名), 或者提供的路径说明中的文件夹。 object.GetBaseName(path) 参数 object 必
VBS教程：方法-GetAbsolutePathName 方法
GetAbsolutePathName 方法从提供的指定路径中返回完整且含义明确的路径。 object.GetAbsolutePathName(pathspec) 参数 object
VBS教程：方法-FolderExists 方法
FolderExists 方法如果指定的文件夹存在，则返回 True；否则返回 False。 object.FolderExists(folderspec) 参数 object 必选项
VBS教程：方法-FileExists 方法
FileExists 方法如果指定的文件存在返回 True；否则返回 False。 object.FileExists(filespec) 参数 object 必选项。应为 FileS

首页

博学

6Ren·AI

商城

r - data.table 在新列中粘贴值的方法以另一列中的值为条件