Skip to content

Instantly share code, notes, and snippets.

source("manifesto_functions.R")
#############################
### Phish In 15 Lines of Code
## Simple ABCs of Phishing
# Make lot's of phish
sim_phish <- 1000000
library(tidyverse)
library(lubridate)
library(survival)
library(survminer)
#############################
### Making A Life Table In R!
# Step 1: Get Data
tmm <-read.csv(
my_packages <- c("tidyverse", "lubridate", "survival", "survminer",
"ProbBayes", "Bolstad", "ggplot2", "devtools",
"mc2d", "bayestestR", "scales", "knitr", "ggridges",
"simstudy", "betareg", "data.table", "boot", "broom",
"stats4","jsonlite","tidybayes","bayesplot", "BayesFactor",
"rstanarm")
not_installed <-
my_packages[!(my_packages %in% installed.packages()[ , "Package"])]
my_packages <- c("tidyverse", "lubridate", "survival", "survminer",
"ProbBayes", "Bolstad", "ggplot2", "devtools",
"mc2d", "bayestestR", "scales", "knitr")
not_installed <-
my_packages[!(my_packages %in% installed.packages()[ , "Package"])]
if (length(not_installed)){
msgVal = paste("Install packages: ",toString(not_installed))
@ribsy
ribsy / ABTestingGenerativeModel.R
Last active July 15, 2022 14:34
This is a simple probabilistic programming example for AB testing security products. Its merely a simple starter example...with more to come. You can read more about this at https://www.soluble.ai/blog/security_budgets_at_risk
#' ---
#' title: 3 Metrics For Getting Better Security ROI
#' author: Richard Seiersen
#' date: June 4, 2020
#' output:
#' html_document:
#' toc: true
#' highlight: zenburn