Thực hiện một cột với các giá trị trùng lặp độc đáo trong một dataframe

Question

Tôi có một dataframe nơi một cột có giá trị nhân bản như

employee <- data.frame(name = c('John', 'Joe', 'Mat', 'John', 'Joe'), 
      salary = c(1500, 2000, 1700, 1210, 2100), 
      startdate = c('2012-05-10', '2015-02-17', 
      '2014-09-11', '2011-11-23', '2010-10-27')) 

tôi có thể nhận các yếu tố duy nhất trong cột 1 của

unique(employee$name) 

Tuy nhiên, Tôi muốn tạo từng mục trong cột name duy nhất. Nếu một cái gì đó xuất hiện lần thứ hai nối thêm _1 với nó. Nếu nó xuất hiện một lần nữa nối thêm _2 vào nó. Vì vậy, trong khung dữ liệu của nhân viên, tôi muốn thay đổi cột thứ hai thành

John 
Joe 
Mat 
John_1 
Joe_1 

Có cách nào trừ vòng lặp không?

Answer 1

Chúng tôi có thể sử dụng make.names với unique=TRUE. Theo mặc định, một . sẽ được nối trước khi những con số hậu tố, và có thể được thay thế bằng _ sử dụng sub

employee$name <- sub('[.]', '_', make.names(employee$name, unique=TRUE)) 

Hoặc một lựa chọn tốt hơn được đề xuất bởi @DavidArenburg. Nếu cột name là factor lớp, chuyển đổi các cột đầu vào character lớp (as.character) trước khi áp dụng make.unique

make.unique(as.character(employee$name), sep = "_") 
#[1] "John" "Joe" "Mat" "John_1" "Joe_1"