如果花瓣。width为o.1,那么我的新列值应为1:n number,因为它对每个唯一值都具有ti打印
`data=iris
data=data[order(data$Petal.Width),]
count=1
data$iden<-with(data,(data$Petal.Width))
for (i in 1:length(data)) {
if(data$Petal.Width[i] == data$Petal.Width[i]){
count=count+1 }}`
我们可以创建一个序列ave
从base R
data$Seq <- with(data, ave(seq_along(Petal.Width), Petal.Width, FUN = seq_along))
或使用 data.table
library(data.table)
data$Seq <- rowid(data$Petal.Width)
或搭配 dplyr
library(dplyr)
data %>%
group_by(Petal.Width) %>%
mutate(Seq = row_number())
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句