R_Language 板


LINE

[问题叙述]: 请教各位先进, 我要从图案档名中拿数字以及括号中的数字部分。我的档名有两个规律性,目前我已经 可以各写1个pattern拿出我要的部分,希望有先进指点如何只用一个pattern就可以从这 2类档名中拿出数字及括号中数字部分。 number1_[number2,number3] 3个number的位数不是固定的。 [程式范例]: 我想从以下两类档名中拿出 "200330_[50706,13606]" 第1类档名例子: 档名在pattern之前有字串,字串里可能有数字,字母或special characters x2 <- "B16F10 KO 200330_[50706,13606]_CD8_path_view.jpg" gsub(pattern = ".*( )(\\d+_\\[\\d+,\\d+\\]).*" ,replacement= "\\2" # get pattern within the 2nd pair of brackets ,x=x2) # [1] "200330_[50706,13606]" 第2类档名例子: 档名以pattern开号 x3 <- "200330_[50706,13606]_CD8_path_view.jpg" gsub(pattern = "(\\d+_\\[\\d+,\\d+\\]).*" ,replacement= "\\1" # get pattern within the 1st pair of brackets ,x=x3) # [1] "200330_[50706,13606]" 请教如何用1个pattern就能从x2, x3拿出200330_[50706,13606]? 很明显地,.* 不能描述没有东西。但我不知道为何以下的gsub只拿出1位数字 0_[50706,13606]? gsub(pattern = ".*(\\d+_\\[\\d+,\\d+\\]).*" ,replacement= "\\1" # get pattern within the 1st pair of brackets ,x=x3) # [1] "0_[50706,13606]" 我把以上程式放在 hackMD里 https://hackmd.io/@Chang/string-manipulation-in-R 请看第一部分 Examples of subsetting numbers from image file names 谢谢指点 --



※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 1.122.149.154 (澳大利亚)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1628222030.A.D3E.html
1F:推 xiangying: str_sub(字串,str_locate(字串,"\\d{6}..\\d{5}.\\d{5} 08/06 12:53
2F:→ xiangying: .)) 08/06 12:53
3F:→ xiangying: package stringr 08/06 12:54
4F:→ luenchang: 数字的位数不是固定的 08/06 12:58
5F:→ luenchang: 在我的例子里是6及5位数。数据里可能是1到7位数 08/06 13:00
6F:→ xiangying: 那就把{6}改成{1,7}看看? 08/06 13:01
7F:→ luenchang: 是不是把//d{6} 及 //d{5}改成//d{+}就可以了? 08/06 13:03
8F:→ luenchang: 谢谢xiangying指点,hackMD程式码已更新 08/11 10:09







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:Soft_Job站内搜寻

TOP