General
PromptBeginner5 minmarkdown
cat(sprintf( %-25s %5d (%.1f%%)\n
lbl
0
Explore
Find agent skills by outcome
120,433 skills indexed with the new KISS metadata standard.
Showing 24 of 120,433Categories: Data & Insights, Education, Coding & Debugging, General, Data
General
PromptBeginner5 minmarkdown
cat_cols <- names(df)[sapply(df
function(x) is.factor(x) | is.character(x))]
0
General
PromptBeginner5 minmarkdown
cat(sprintf(\n %s (%d unique values)\n
col
0
General
PromptBeginner5 minmarkdown
tbl <- sort(table(x
useNA = no)
0
General
PromptBeginner5 minmarkdown
──────
───
0
General
PromptBeginner5 minmarkdown
min(x)
mean(x)
0
General
PromptBeginner5 minmarkdown
Column
Min
0
General
PromptBeginner5 minmarkdown
pct_na <- round(cols_with_na[col] / n_row * 100
1)
0
General
PromptBeginner5 minmarkdown
num_cols <- names(df)[sapply(df
is.numeric)]
0
General
PromptBeginner5 minmarkdown
col
bar
0
General
PromptBeginner5 minmarkdown
bar <- paste0(rep(█
bar_len)
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
pct <- round(n_na / n_row * 100
1)
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
# par(mfrow = c(1
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(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