Skip to main content
AI Assist is now on Stack Overflow. Start a chat to get instant answers from across the network. Sign up to save and share your chats.
deleted 118 characters in body
Source Link

id <- c(1:10)

name <- c("John ", "Rob ", "Rachel ", "Christy ", "Johnson ", "Candace ", "Carlson ", "Pansy ", "Darius ", " Garcia")

job_title <- c("Professional", "Programmer", "Management", "Clerical", "Developer", "Programmer", "Management", "Clerical", "Developer", "Programmer")

employee <- data.frame(id, name, job_title)

print(employee)

df <- data.frame( ID = 1:10, Name = LETTERS[1:10], Score = sample(50:100, 10, replace = TRUE) ) n <- 10 random_rows <- df[sample(nrow(df), n), ] print(random_rows) 

id <- c(1:10)

name <- c("John ", "Rob ", "Rachel ", "Christy ", "Johnson ", "Candace ", "Carlson ", "Pansy ", "Darius ", " Garcia")

job_title <- c("Professional", "Programmer", "Management", "Clerical", "Developer", "Programmer", "Management", "Clerical", "Developer", "Programmer")

employee <- data.frame(id, name, job_title)

print(employee)

df <- data.frame( ID = 1:10, Name = LETTERS[1:10], Score = sample(50:100, 10, replace = TRUE) ) n <- 10 random_rows <- df[sample(nrow(df), n), ] print(random_rows) 
Post Undeleted by Kakoli Rani Paul
Post Deleted by Kakoli Rani Paul
added 2 characters in body
Source Link

id <- c(1:10) name

name <- c("John ", "Rob ", "Rachel ", "Christy ", "Johnson ", "Candace ", "Carlson ", "Pansy ", "Darius ", " Garcia")

job_title <- c("Professional", "Programmer", "Management", "Clerical", "Developer", "Programmer", "Management", "Clerical", "Developer", "Programmer")

employee <- data.frame(id, name, job_title)

print(employee)

id <- c(1:10) name <- c("John ", "Rob ", "Rachel ", "Christy ", "Johnson ", "Candace ", "Carlson ", "Pansy ", "Darius ", " Garcia")

job_title <- c("Professional", "Programmer", "Management", "Clerical", "Developer", "Programmer", "Management", "Clerical", "Developer", "Programmer")

employee <- data.frame(id, name, job_title)

print(employee)

id <- c(1:10)

name <- c("John ", "Rob ", "Rachel ", "Christy ", "Johnson ", "Candace ", "Carlson ", "Pansy ", "Darius ", " Garcia")

job_title <- c("Professional", "Programmer", "Management", "Clerical", "Developer", "Programmer", "Management", "Clerical", "Developer", "Programmer")

employee <- data.frame(id, name, job_title)

print(employee)

Source Link

id <- c(1:10) name <- c("John ", "Rob ", "Rachel ", "Christy ", "Johnson ", "Candace ", "Carlson ", "Pansy ", "Darius ", " Garcia")

job_title <- c("Professional", "Programmer", "Management", "Clerical", "Developer", "Programmer", "Management", "Clerical", "Developer", "Programmer")

employee <- data.frame(id, name, job_title)

print(employee)