r语言。dt$y=c(“wk3”,”week-1”,”7”,”s#9”)，提取其数值构成z

可以使用正则表达式和字符串处理函数来提取dt$y中的数值。具体的实现代码如下：

library(stringr)

# 将dt$y中的非数字字符替换为空格
dt$y <- str_replace_all(dt$y, "[^0-9]", " ")

# 将dt$y中的连续空格替换为单个空格
dt$y <- str_replace_all(dt$y, "\\s+", " ")

# 将dt$y转换为数字向量
z <- as.numeric(str_split(dt$y, " ")[[1]])

这样就可以将dt$y中的数值提取出来赋值给z了。在这个例子中，z的取值为3, 1, 7, 9。