{"word_count": 343, "character_count": 2299}
also known as quiz numéro 4 du cours STT5100 (de la session d'hiver). Vendredi dernier, alors que nous terminions le cours vers midi, François Legault a décrété l’état d’urgence sanitaire pour une quinzaine de jours. Le cours est donc sur la glace depuis une semaine, et (pour l'instant) encore une bonne semaine.Les deux derniers cours ont été l'occasion de voir comment faire, et comment analyser, une régression logistique. Histoire de briser un peu le confinement que l'on connaît depuis une semaine, j'ai envoyé ce matin un quiz aux étudiants, et j'en profite pour le mettre en ligne (la correction arrivera dans le milieu de la semaine prochaine) pour tous ceux qui voudraient se pratiquer un peu sur les modèles de classification...J'ai mis en ligne une base de données avec des informations sur les passagers du Titanic, qui est un paquebot qui a fait naufrage il y a plus d'un siècle (certains ont peut être vu le documentaire)loc_fichier = "http://freakonometrics.free.fr/titanic.RData"download.file(loc_fichier, "titanic.RData")load("titanic.RData")str(base)On a dans la base Survived: Passenger survival indicator (1 if survived) Pclass: Passenger class Sex: Sex of the passenger Age: Age of the passenger SibSp: Number of siblings/spouses aboard Parch: Number of parents/children aboard Embarked: Port of Embarkation Name: Name of passengerLa dernière variable ne sert pas à grand chose, donc on la vire,base = base[,1:7]J'ai ensuite posé une série de questions, quelle proportion de passagers ont survécu ? quelle proportion de passagers de première classe ont survécu ? quelle est la statistique de test pour un test d'indépendance du chi-deux [vu en cours vendredi dernier] entre le fait de survivre (ou pas) et la classe ? ensuite il faut faire une régression logistique, et prévoir la probabilité de survie pour deux passagers (fictifs) du paquebotnewbase = data.frame(  Pclass = as.factor(c(1,3)),  Sex = as.factor(c("female","male")),  Age = c(17,20),  SibSp = c(1,0),  Parch = c(2,0),  Embarked = as.factor(c("S","S")),  Name = as.factor(c("Winslet, Miss. Kate","DiCaprio, Mr. Leonardo")))Je ne peux mettre le formulaire de réponse en ligne ici, mais les commentaires sont ouverts pour ceux qui voudraient d'entraîner un peu pendant cette période un peu longue de confinement...