Publications by Emanuele Messori

Rounding matters

13.12.2023

Half Integers Rounding does matter In R half_integers <- seq(0.5, 10.5, 1) cat(paste(half_integers, "=", round(half_integers)), sep = "\n") 0.5 = 0 1.5 = 2 2.5 = 2 3.5 = 4 4.5 = 4 5.5 = 6 6.5 = 6 7.5 = 8 8.5 = 8 9.5 = 10 10.5 = 10 From R documentation : round rounds the values in its first argument to the specified number of decim...

1245 sym Python (2764 sym/18 pcs)

Exploring the BRFSS data - main variables and smoking habit

04.09.2020

Setup Load packages library(ggplot2) library(dplyr) library(ggmosaic) Load data load("brfss2013.RData") Part 1: Data Behavioural Risk Factor Surveillance System The BRFSS is a state-based survey started in 1984 by the Centers for Disease Control and Prevention(CDC). The objective is to collect information about adult U.S. residents “regar...

8238 sym R (5089 sym/35 pcs) 11 img

Statistical inference with the GSS data

05.10.2020

Setup Load packages library(ggplot2) library(dplyr) library(statsr) Load data load("gss.Rdata") 1. Data 1.1 What is the GSS ? "Since 1972, the General Social Survey (GSS) has been monitoring societal change and studying the growing complexity of American society. The GSS aims to gather data on contemporary American society in order to mon...

7309 sym R (4390 sym/20 pcs) 8 img

FAO 2017

07.05.2021

library(data.table) library(dplyr) library(ggplot2) library(knitr) require(tidymodels) Chargement des données aa <- fread("DAN-P4-FAO/aide_alimentaire.csv", encoding = 'UTF-8', colClasses = c('character', 'integer', 'character', 'numeric' )) da <- fread("DAN-P4-FAO/dispo_alimentaire.csv", encoding = 'UTF-8') pop <-fread("DAN-P4-FAO/popula...

4461 sym R (11034 sym/28 pcs) 2 img 11 tbl

Lapage - Analyse des ventes

10.06.2021

Librairies library(tidyverse) library(scales) library(lubridate) library(knitr) library(zoo) source("C:/Users/teore/OneDrive/OC_DataAnalyst/P6/euro.R") 1 Analyse de conformité des données 1.1 Chargement customers <- read_csv("customers.csv", col_types = c('cfd')) products <- read_csv('products.csv', col_types = c('cdf')) transactions <...

9142 sym R (31896 sym/134 pcs) 37 img 13 tbl

Production de viande de volaille - Segmentation de marché

30.07.2021

Importation des librairies library(readr) library(tidyverse) library(data.table) library(knitr) source("functions.R") Importation et preparation des données Nous utiliserons le fichier comprenant toutes les données sur les bilans alimentaires disponibles sur le site FAO, pour repérer les données qui concernent la viande de volaille (prod...

7145 sym R (31519 sym/73 pcs) 28 img 2 tbl

Detecteur de faux billets (Counterfeit Detection)

07.08.2021

Chargement des librairies library(tidyverse) library(DataExplorer) library(e1071) library(caret) library(caTools) library(InformationValue) Chargement des données et premiere analyse data <- read_delim("billets.csv", delim = ";") summary(data) ## is_genuine diagonal height_left height_right ## Mode :logical Min. ...

3450 sym R (23730 sym/66 pcs) 11 img

DVF_Courbouzon

15.05.2022

...

6 sym