我想用正则表达式检查文件夹中文件的扩展名。
例如,.wmv和.WMV可以识别相同的单词。
但是您如何使.wmv和WMV识别同一件事?
我现在使用的是'^ [。]?[^。] + $'
如果是大小写,则将输入值转换为小写代码并进行比较。
如何使wmv和WMV相同?
答案 0 :(得分:0)
您可以使用以下正则表达式检查文件扩展名。
library(dplyr)
library(survival)
library(survminer)
original_input <- data_frame(
Strain = rep(c("Random_1", "Random_2"), each = 100),
time = c(rnorm(100, mean = 13), rnorm(100, mean = 19)),
Censored = 0,
treatment_onset = c(time - abs(c(rnorm(100, mean=0.25), rnorm(100, mean = 2))))
)
# Ugly work-around code to retrieve population survival
original_input <- original_input[order(original_input$Strain, original_input$time), ]
fit <- survfit(Surv(time,1-Censored) ~ Strain, data=original_input)
names(fit$strata) <- gsub(pattern = "Strain=", x = names(fit$strata), replacement = "")
mod <- summary(fit)
mod <- mod[c("strata","time","surv")] %>% as_tibble()
mod <- mod[order(mod$strata, mod$time), ]
data <- cbind(original_input,mod$surv)
# plot output
ggsurv <- ggsurvplot(fit = fit, data = data, xlab = "Time")
ggsurv$plot +
geom_point(aes(x = treatment_onset, y = mod$surv, color = Strain, shape = Strain),
data = data,show.legend = FALSE) +
geom_segment(aes(x = treatment_onset, y = mod$surv,
xend = time, yend = mod$surv, color = Strain),
data = data)
您无需将输入值转换为小写字母进行比较,而是可以使用正则表达式的替代功能,使您能够忽略Case。
示例:Here
答案 1 :(得分:0)
RegexOptions正在为您MSDN服务。
public static System.Text.RegularExpressions.Match(string input, string pattern, System.Text.RegularExpressions.RegexOptions options);
例如:
System.Text.RegularExpressions.Regex.Match(input, pattern, System.Text.RegularExpressions.RegexOptions.IgnoreCase);
以下是您可以使用的所有选项:RegexOptions Enum