Athospd

# Load necessary libraries
library(tidymodels)
library(bonsai)
library(tidyverse)
library(ggplot2)
library(patchwork)
f <- glue::glue
theme_set(theme_minimal())
logit <- function(x) 1/(1 + exp(-x))

jjesusfilho

#' Converts PostgreSQL table from long to wide format
#'
#' @param conn Connection
#' @param tbl Table
#' @param new_tbl Optional. It creates a new table in the database 
#'      instead of importing it to R
#' @param id_cols String vector with the name of columns to be used as identities
#' @param names_from Column whose values will become variables
#' @param values_from Column whose values will populate the new variables
#'