General
PromptBeginner5 minmarkdown
na_flag <- if (n_na == 0) " else sprintf( *** %d NAs (%.1f%%)
n_na
0
Explore
Find agent skills by outcome
104,558 skills indexed with the new KISS metadata standard.
Showing 24 of 104,558Categories: General, Data, Communication
General
PromptBeginner5 minmarkdown
pct <- round(n_na / n_row * 100
1)
0
Data
PromptBeginner5 minmarkdown
check_data <- function(df
top_n_levels = 8) {
0
General
PromptBeginner5 minmarkdown
cat(sprintf( Rows: %d Columns: %d\n
n_row
0
General
PromptBeginner5 minmarkdown
# par(mfrow = c(1
1))
0
General
PromptBeginner5 minmarkdown
# par(mfrow = c(2
2))
0
General
PromptBeginner5 minmarkdown
# png(figure1_distributions.png
width = 1200
0
Data
PromptBeginner5 minmarkdown
# saveRDS(df
data_clean.rds)
0
General
PromptBeginner5 minmarkdown
par(mfrow = c(1
1))
0
General
PromptBeginner5 minmarkdown
par(mfrow = c(2
2))
0
General
PromptBeginner5 minmarkdown
# lmtest::coeftest(fit
vcov = sandwich::vcovHC(fit
0
Data
PromptBeginner5 minmarkdown
# fit_aov <- aov(outcome_var ~ group_var
data = df)
0
Data
PromptBeginner5 minmarkdown
t.test(outcome_var ~ group_var
data = df)
0
General
PromptBeginner5 minmarkdown
par(mfrow = c(1
1))
0
General
PromptBeginner5 minmarkdown
col = hcl.colors(20
RdBu
0
Data
PromptBeginner5 minmarkdown
abline(lm(outcome_var ~ predictor
data = df)
0
General
PromptBeginner5 minmarkdown
cor_mat <- cor(df[num_cols]
use = complete.obs)
0
General
PromptBeginner5 minmarkdown
col = red
lwd = 2)
0
General
PromptBeginner5 minmarkdown
par(mfrow = c(2
2))
0
General
PromptBeginner5 minmarkdown
col = adjustcolor(steelblue
alpha.f = 0.5)
0
General
PromptBeginner5 minmarkdown
plot(df$predictor
df$outcome_var
0
General
PromptBeginner5 minmarkdown
# prop.table(table(df$group
df$category)
0
General
PromptBeginner5 minmarkdown
# table(df$group
df$category
0
General
PromptBeginner5 minmarkdown
))
3)
0