小球编号 向量筛选
原创
title: "lesson2 课后思考"
output: html_document
date: "2023-12-12"
knitr::opts_chunk$set(echo = TRUE, message = F, warning = F)关于13个彩色球带编号问题
install.packages("stringr")
library(stringr) #安装stringr包对13个小球进行编号，蓝色b1，b2……，绿色g1，g2……，黄色y1，y2（这里需跟后面y0的赋值区分开，这里是坏习惯！变量和赋值尽量用不同的字母！）
x0 <- paste0(rep("b",3), seq(1,3,1))
y0 <- paste0(rep("g",4), seq(1,4,1))
z0 <- paste0(rep("y",6), seq(1,6,1))
new_1 <- c(x0, y0, z0)学习一下stringr包的用法：字符型向量中开头或结尾匹配查询的思想，str_starts()用于开头匹配，str_ends()用于结尾匹配，输出的结果是逻辑值，本例中相当于需要筛选出开头是b或g的所有变量，用到的还是逻辑值筛选的思想
??stringr #请直接去看examplestr_starts(new_1,"b"); str_starts(new_1,"g") #运行函数看一下
new_1[c(str_starts(new_1,"b"))] #输出b开头的
new_1[c(str_starts(new_1,"g"))] #输出g开头的最开始假设这个场景其实是想假设有序筛选的问题，所以第一反应是给小球进行编号，但解决这个问题的过程中发现好像和有序筛选没啥关系……后续再继续想一下
第一次用Rmarkdown不太熟练orz 请大家多多提意见多多指正！有的代码写得也挺冗长的不知道怎么精简
引自生信技能树
原创声明：本文系作者授权腾讯云开发者社区发表，未经许可，不得转载。
如有侵权，请联系 cloudcommunity@tencent.com 删除。
原创声明：本文系作者授权腾讯云开发者社区发表，未经许可，不得转载。
如有侵权，请联系 cloudcommunity@tencent.com 删除。
评论
登录后参与评论
推荐阅读
目录
腾讯云开发者
Copyright © 2013 - 2026 Tencent Cloud. All Rights Reserved. 腾讯云 版权所有
深圳市腾讯计算机系统有限公司 ICP备案/许可证号：粤B2-20090059 
粤公网安备44030502008569号
腾讯云计算（北京）有限责任公司 京ICP证150476号 | 京ICP备11018762号