library(shiny)
library(shinydashboard)
library(shinyWidgets)
library(rAmCharts)
library(ggplot2)
library(DT)
library(data.table)
library(optiPlus)
# data <- diamonds
# data <- as.data.frame(diamonds)
# data <- data[1:100, ]
source("shinyUtils.R")
# data <- mtcars
# data <- iris
# data <- read.csv("C:/Anais/Projets stat/mycotox/Code/Data/base_FUMO.csv", sep =";", dec = ".", header = TRUE)
# data$FUMO <- as.factor(data$FUMO)
# data <- na.omit(data)
# library(lasso2)
# data(Prostate)
# library(lasso2)
# data(Prostate)
# data <- Prostate
# data$svi <- as.factor(data$svi)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.