Data Science

Import, Modify & Save

Séance Précendente


  • %>% (pipe operator)
  • select()
  • filter()
  • group_by()
  • summarise()
  • mutate()
  • inner_join()

Rappel: Creation de dataset

library(tidyverse)

# Consulter un dataset 
starwars

# Creation du dataset new_starwars basé sur starwars
new_starwars <- starwars

Quel type de données peut-on importer?

  • .txt, .csv, .xlsx (classique)
  • Base de données (ORACLE, Microsoft Server, etc)
  • Images, audio et plus

Comment importer des données?

library(readr)
# library(readxl)

# df_csv <- read_csv('~path/fichier.csv')
# df_xls <- read_xls('~path/fichier.xls')

df_rev <- read_csv('rev.csv')

Aperçu du Fichier

head(df_rev)
## # A tibble: 6 x 3
##   gest            date         rev
##   <chr>           <date>     <dbl>
## 1 Thomas Malthus  2019-10-11 1196.
## 2 Irving Fisher   2019-09-05 7412.
## 3 Alfred Marshall 2019-05-01 3640.
## 4 Hyman Minsky    2019-06-20 6845.
## 5 Adam Smith      2019-04-13 5662.
## 6 John Keynes     2019-10-28 3966.

Instructions

  • 1) Lire le fichier rev.csv
  • 2) Voir un aperçu du fichier

Modification à Effectuer

  • 1) Afficher la somme des revenus par gestionnaire
  • 2) Ajouter une colonne trimestre
  • 3) Ajouter une colonne année
  • 4) Afficher la somme des revenus par an
  • 5) Afficher la somme des revenus par trimestre et par an
  • 6) Afficher la somme des revenus par gestionnaire, par trim. et par an
  • 7) Selectionner les observations dernier trimestre et dernière année
  • 8) Ajouter une colonnes où les revenus apparaissent en pourcentage

Sauvegarde du dataset modifié

# Pour les opérations de groupe, min, max, mean, median, quantile
write_csv(df_modif,'~path')

Récapitulatif


  • df <- read_csv('~path')
  • df2 <- df %>% function()
  • write_csv(df2, '~path2')

Merci pour votre attention

Questions?

Contact

Kevin Rosamont Prombo