Explore

Find agent skills by outcome

134,293 skills indexed with the new KISS metadata standard.

Showing 24 of 134,293Categories: Writing & Content, Data, General, Coding & Debugging

PromptBeginner5 minmarkdownQuality: 24

col = adjustcolor(steelblue

alpha.f = 0.5)

PromptBeginner5 minmarkdownQuality: 24

par(mfrow = c(2

2))

PromptBeginner5 minmarkdownQuality: 24

prop.table(table(df$group

df$category)

PromptBeginner5 minmarkdownQuality: 24

))

3)

PromptBeginner5 minmarkdownQuality: 24

table(df$group

df$category

PromptBeginner5 minmarkdownQuality: 24

median = median(x

na.rm = TRUE)

PromptBeginner5 minmarkdownQuality: 24

max = max(x

na.rm = TRUE)

PromptBeginner5 minmarkdownQuality: 24

min = min(x

na.rm = TRUE)

PromptBeginner5 minmarkdownQuality: 24

mean = mean(x

na.rm = TRUE)

PromptBeginner5 minmarkdownQuality: 24

sd = sd(x

na.rm = TRUE)

PromptBeginner5 minmarkdownQuality: 24

round(sapply(df[num_cols]

function(x) c(

PromptBeginner5 minmarkdownQuality: 24

num_cols <- names(df)[sapply(df

is.numeric)]

PromptBeginner5 minmarkdownQuality: 24

df = 2010

]

PromptBeginner5 minmarkdownQuality: 24

df <- df[complete.cases(df[

c(outcome

PromptBeginner5 minmarkdownQuality: 24

breaks = c(0

25

PromptBeginner5 minmarkdownQuality: 24

labels = c(18-25

26-45

PromptBeginner5 minmarkdownQuality: 24

df$gender <- ifelse(df$gender == 1

Male

PromptBeginner5 minmarkdownQuality: 24

df$date <- as.Date(df$date

format = %Y-%m-%d)

PromptBeginner5 minmarkdownQuality: 24

cat(sprintf(\n%s (%d unique):\n

col

PromptBeginner5 minmarkdownQuality: 24

print(table(df[[col]]

useNA = ifany))

PromptBeginner5 minmarkdownQuality: 24

cat(sprintf(Duplicate rows: %d\n

n_dup))

PromptBeginner5 minmarkdownQuality: 24

cat_cols <- names(df)[sapply(df

function(x) is.character(x) | is.factor(x))]

PromptBeginner5 minmarkdownQuality: 24

print(nareport[nareport$n_miss > 0

])

PromptBeginner5 minmarkdownQuality: 24

head(df

10)