General
PromptBeginner5 minmarkdown
cat_cols <- names(df)[sapply(df
function(x) is.factor(x) | is.character(x))]
0
Explore
Find agent skills by outcome
123,988 skills indexed with the new KISS metadata standard.
Showing 24 of 123,988Categories: Data & Insights, General, Cursor-rules, Coding & Debugging, Creative
General
PromptBeginner5 minmarkdown
tbl <- sort(table(x
useNA = no)
0
General
PromptBeginner5 minmarkdown
Column
Min
0
General
PromptBeginner5 minmarkdown
num_cols <- names(df)[sapply(df
is.numeric)]
0
General
PromptBeginner5 minmarkdown
──────
───
0
General
PromptBeginner5 minmarkdown
bar <- paste0(rep(█
bar_len)
0
General
PromptBeginner5 minmarkdown
col
bar
0
General
PromptBeginner5 minmarkdown
pct_na <- round(cols_with_na[col] / n_row * 100
1)
0
General
PromptBeginner5 minmarkdown
cat(sprintf( Columns with NAs: %d of %d\n\n
length(cols_with_na)
0
General
PromptBeginner5 minmarkdown
na_counts <- sapply(df
function(x) sum(is.na(x)))
0
General
PromptBeginner5 minmarkdown
col
cls
0
General
PromptBeginner5 minmarkdown
na_flag <- if (n_na == 0) " else sprintf( *** %d NAs (%.1f%%)
n_na
0
General
PromptBeginner5 minmarkdown
pct <- round(n_na / n_row * 100
1)
0
General
PromptBeginner5 minmarkdown
cat(sprintf( Rows: %d Columns: %d\n
n_row
0
General
PromptBeginner5 minmarkdown
# par(mfrow = c(2
2))
0
General
PromptBeginner5 minmarkdown
# par(mfrow = c(1
1))
0
General
PromptBeginner5 minmarkdown
# png(figure1_distributions.png
width = 1200
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
General
PromptBeginner5 minmarkdown
par(mfrow = c(1
1))
0
General
PromptBeginner5 minmarkdown
col = hcl.colors(20
RdBu
0
General
PromptBeginner5 minmarkdown
cor_mat <- cor(df[num_cols]
use = complete.obs)
0
General
PromptBeginner5 minmarkdown
col = red
lwd = 2)
0