{"id":303,"date":"2014-10-12T17:25:56","date_gmt":"2014-10-12T15:25:56","guid":{"rendered":"http:\/\/wordpress.callac.online\/index.php\/le-tableau-a-double-entree-avec-r\/"},"modified":"2023-10-14T20:14:30","modified_gmt":"2023-10-14T18:14:30","slug":"le-tableau-a-double-entree-avec-r","status":"publish","type":"page","link":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/","title":{"rendered":"Le tableau \u00e0 double entr\u00e9e avec R"},"content":{"rendered":"<h2>Pr\u00e9sentation<\/h2>\n<p>On souhaite produire des \u00e9chantillons \u00e0 partir d&rsquo;un tableau \u00e0 double entr\u00e9e suivant :<\/p>\n<table>\n<tbody>\n<tr class=\"row_even\">\n<td>\u00a0<\/td>\n<td>$B$<\/td>\n<td>$\\overline<em>B<\/em>$<\/td>\n<\/tr>\n<tr class=\"row_odd\">\n<td>$A$<\/td>\n<td>n_AB<\/td>\n<td>n_Ab<\/td>\n<\/tr>\n<tr class=\"row_even\">\n<td>$\\overline<em>A<\/em>$<\/td>\n<td>n_aB<\/td>\n<td>n_ab<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p>En d\u00e9but de script, on renseigne ces 4 effectifs et la taille de l&rsquo;\u00e9chantillon voulu.<\/p>\n<p>Le script affiche en sortie :<br \/>&#8211; la r\u00e9partition initiale<br \/>&#8211; les probabilit\u00e9s correspondantes<br \/>&#8211; la taille de l&rsquo;\u00e9chantillon voulu<br \/>&#8211; le tableau des effectifs obtenus<br \/>&#8211; le tableau des fr\u00e9quences obtenues<\/p>\n<h2>Le script<\/h2>\n<pre class=\"EnlighterJSRAW\" data-enlighter-language=\"generic\">#-------------------------- A modifier\nnb_AB&lt;-20    \nnb_Ab&lt;-30\nnb_aB&lt;-15\nnb_ab&lt;-35\n\ntailleEchantillon&lt;-1000\n\n\n###############################################################################\n# Cr\u00e9ation des donn\u00e9es (univers)\n\nd_AB&lt;-data.frame(\"A\"=c(rep(\"Oui\",nb_AB)),\"B\"=c(rep(\"Oui\",nb_AB)))\nd_Ab&lt;-data.frame(\"A\"=c(rep(\"Oui\",nb_Ab)),\"B\"=c(rep(\"Non\",nb_Ab)))\nd_aB&lt;-data.frame(\"A\"=c(rep(\"Non\",nb_aB)),\"B\"=c(rep(\"Oui\",nb_aB)))\nd_ab&lt;-data.frame(\"A\"=c(rep(\"Non\",nb_ab)),\"B\"=c(rep(\"Non\",nb_ab)))\n\nunivers&lt;-rbind(d_AB,d_Ab,d_aB,d_ab)\n\n# Cr\u00e9ation du tableau de la r\u00e9partion initiale\n\ntabRepartition&lt;-table(univers$A,univers$B,deparse.level=2)\nprint(\"R\u00e9partition initiale\")\nprint(tabRepartition)\n\n# Calcul des probabilit\u00e9s\n\ntabProbabilites&lt;-prop.table(tabRepartition)\nprint(\"Tableau des probabilit\u00e9s\")\nprint(tabProbabilites)\n\n\n##################################################################################\n\n# Affichage de la taille de l'\u00e9chantillon\n\nprint(\"Taille de l'\u00e9chantillon\")\nprint(tailleEchantillon)\n\n# Cr\u00e9ation de l'\u00e9chantillon\n\nx&lt;-1:nrow(univers)\nechantillon&lt;-NULL\n\nfor (i in seq(1,tailleEchantillon)) \n{\n  k&lt;-sample(x,1)\n  echantillon&lt;-rbind(echantillon,univers[k,])\n}\n\n# Cr\u00e9ation du tableau des effectifs\n\ntabEffectifs&lt;-table(echantillon$A,echantillon$B,deparse.level=2)\n\nprint(\"Tableau des Effectifs sur l'\u00e9chantillon\")\nprint(tabEffectifs)\n\n# Cr\u00e9ation du tableau de fr\u00e9quences\n\ntabFrequences&lt;-prop.table(tabEffectifs)\n\nprint(\"Tableau des Fr\u00e9quences sur l'\u00e9chantillon\")\nprint(tabFrequences)<\/pre>\n<p>\u00a0<\/p>\n<p>On obtient dans la console :<\/p>\n<p><code><br \/>\n[1] \"R\u00e9partition initiale\"<br \/>\n         univers$B<br \/>\nunivers$A Oui Non<br \/>\n      Oui  20  30<br \/>\n      Non  15  35<br \/>\n[1] \"Tableau des probabilit\u00e9s\"<br \/>\n         univers$B<br \/>\nunivers$A  Oui  Non<br \/>\n      Oui 0.20 0.30<br \/>\n      Non 0.15 0.35<br \/>\n[1] \"Taille de l'\u00e9chantillon\"<br \/>\n[1] 1000<br \/>\n[1] \"Tableau des Effectifs sur l'\u00e9chantillon\"<br \/>\n             echantillon$B<br \/>\nechantillon$A Oui Non<br \/>\n          Oui 219 311<br \/>\n          Non 151 319<br \/>\n[1] \"Tableau des Fr\u00e9quences sur l'\u00e9chantillon\"<br \/>\n             echantillon$B<br \/>\nechantillon$A   Oui   Non<br \/>\n          Oui 0.219 0.311<br \/>\n          Non 0.151 0.319<br \/>\n<\/code><\/p>\n\n\n<p><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Pr\u00e9sentation On souhaite produire des \u00e9chantillons \u00e0 partir d&rsquo;un tableau \u00e0 double entr\u00e9e suivant : \u00a0 $B$ $\\overlineB$ $A$ n_AB n_Ab $\\overlineA$ n_aB n_ab En d\u00e9but de script, on renseigne&hellip;<\/p>\n","protected":false},"author":1,"featured_media":0,"parent":2085,"menu_order":3,"comment_status":"closed","ping_status":"closed","template":"","meta":{"footnotes":""},"class_list":["post-303","page","type-page","status-publish","hentry"],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v27.1.1 - https:\/\/yoast.com\/product\/yoast-seo-wordpress\/ -->\n<title>Le tableau \u00e0 double entr\u00e9e avec R - Maths &amp; Num\u00e9rique<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/\" \/>\n<meta property=\"og:locale\" content=\"fr_FR\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Le tableau \u00e0 double entr\u00e9e avec R - Maths &amp; Num\u00e9rique\" \/>\n<meta property=\"og:description\" content=\"Pr\u00e9sentation On souhaite produire des \u00e9chantillons \u00e0 partir d&rsquo;un tableau \u00e0 double entr\u00e9e suivant : \u00a0 $B$ $overlineB$ $A$ n_AB n_Ab $overlineA$ n_aB n_ab En d\u00e9but de script, on renseigne&hellip;\" \/>\n<meta property=\"og:url\" content=\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/\" \/>\n<meta property=\"og:site_name\" content=\"Maths &amp; Num\u00e9rique\" \/>\n<meta property=\"article:modified_time\" content=\"2023-10-14T18:14:30+00:00\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Dur\u00e9e de lecture estim\u00e9e\" \/>\n\t<meta name=\"twitter:data1\" content=\"2 minutes\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/\",\"url\":\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/\",\"name\":\"Le tableau \u00e0 double entr\u00e9e avec R - Maths &amp; Num\u00e9rique\",\"isPartOf\":{\"@id\":\"https:\/\/wordpress.callac.online\/#website\"},\"datePublished\":\"2014-10-12T15:25:56+00:00\",\"dateModified\":\"2023-10-14T18:14:30+00:00\",\"breadcrumb\":{\"@id\":\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/#breadcrumb\"},\"inLanguage\":\"fr-FR\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Accueil\",\"item\":\"https:\/\/wordpress.callac.online\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Logiciels math\u00e9matiques\",\"item\":\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/\"},{\"@type\":\"ListItem\",\"position\":3,\"name\":\"Le logiciel R\",\"item\":\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/\"},{\"@type\":\"ListItem\",\"position\":4,\"name\":\"Les tirages avec R\",\"item\":\"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/\"},{\"@type\":\"ListItem\",\"position\":5,\"name\":\"Le tableau \u00e0 double entr\u00e9e avec R\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/wordpress.callac.online\/#website\",\"url\":\"https:\/\/wordpress.callac.online\/\",\"name\":\"Maths & Num\u00e9rique\",\"description\":\"Des outils pour les enseignants de math\u00e9matiques et de num\u00e9rique\",\"publisher\":{\"@id\":\"https:\/\/wordpress.callac.online\/#\/schema\/person\/04061f1ca2c2c42039142a704be95940\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/wordpress.callac.online\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"fr-FR\"},{\"@type\":[\"Person\",\"Organization\"],\"@id\":\"https:\/\/wordpress.callac.online\/#\/schema\/person\/04061f1ca2c2c42039142a704be95940\",\"name\":\"dlefur\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"fr-FR\",\"@id\":\"https:\/\/wordpress.callac.online\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/secure.gravatar.com\/avatar\/4a9e17be136808c6597f28aa2b6c13126dab066fdc2198ff60090972c9b7fafc?s=96&d=mm&r=g\",\"contentUrl\":\"https:\/\/secure.gravatar.com\/avatar\/4a9e17be136808c6597f28aa2b6c13126dab066fdc2198ff60090972c9b7fafc?s=96&d=mm&r=g\",\"caption\":\"dlefur\"},\"logo\":{\"@id\":\"https:\/\/wordpress.callac.online\/#\/schema\/person\/image\/\"},\"description\":\"Enseignant de math\u00e9matiques Lyc\u00e9e Pasteur S\u00e3o Paulo\",\"sameAs\":[\"http:\/\/wordpress.callac.online\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Le tableau \u00e0 double entr\u00e9e avec R - Maths &amp; Num\u00e9rique","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/","og_locale":"fr_FR","og_type":"article","og_title":"Le tableau \u00e0 double entr\u00e9e avec R - Maths &amp; Num\u00e9rique","og_description":"Pr\u00e9sentation On souhaite produire des \u00e9chantillons \u00e0 partir d&rsquo;un tableau \u00e0 double entr\u00e9e suivant : \u00a0 $B$ $overlineB$ $A$ n_AB n_Ab $overlineA$ n_aB n_ab En d\u00e9but de script, on renseigne&hellip;","og_url":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/","og_site_name":"Maths &amp; Num\u00e9rique","article_modified_time":"2023-10-14T18:14:30+00:00","twitter_card":"summary_large_image","twitter_misc":{"Dur\u00e9e de lecture estim\u00e9e":"2 minutes"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/","url":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/","name":"Le tableau \u00e0 double entr\u00e9e avec R - Maths &amp; Num\u00e9rique","isPartOf":{"@id":"https:\/\/wordpress.callac.online\/#website"},"datePublished":"2014-10-12T15:25:56+00:00","dateModified":"2023-10-14T18:14:30+00:00","breadcrumb":{"@id":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/#breadcrumb"},"inLanguage":"fr-FR","potentialAction":[{"@type":"ReadAction","target":["https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/le-tableau-a-double-entree-avec-r\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Accueil","item":"https:\/\/wordpress.callac.online\/"},{"@type":"ListItem","position":2,"name":"Logiciels math\u00e9matiques","item":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/"},{"@type":"ListItem","position":3,"name":"Le logiciel R","item":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/"},{"@type":"ListItem","position":4,"name":"Les tirages avec R","item":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/les-tirages-avec-r\/"},{"@type":"ListItem","position":5,"name":"Le tableau \u00e0 double entr\u00e9e avec R"}]},{"@type":"WebSite","@id":"https:\/\/wordpress.callac.online\/#website","url":"https:\/\/wordpress.callac.online\/","name":"Maths & Num\u00e9rique","description":"Des outils pour les enseignants de math\u00e9matiques et de num\u00e9rique","publisher":{"@id":"https:\/\/wordpress.callac.online\/#\/schema\/person\/04061f1ca2c2c42039142a704be95940"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/wordpress.callac.online\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"fr-FR"},{"@type":["Person","Organization"],"@id":"https:\/\/wordpress.callac.online\/#\/schema\/person\/04061f1ca2c2c42039142a704be95940","name":"dlefur","image":{"@type":"ImageObject","inLanguage":"fr-FR","@id":"https:\/\/wordpress.callac.online\/#\/schema\/person\/image\/","url":"https:\/\/secure.gravatar.com\/avatar\/4a9e17be136808c6597f28aa2b6c13126dab066fdc2198ff60090972c9b7fafc?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/4a9e17be136808c6597f28aa2b6c13126dab066fdc2198ff60090972c9b7fafc?s=96&d=mm&r=g","caption":"dlefur"},"logo":{"@id":"https:\/\/wordpress.callac.online\/#\/schema\/person\/image\/"},"description":"Enseignant de math\u00e9matiques Lyc\u00e9e Pasteur S\u00e3o Paulo","sameAs":["http:\/\/wordpress.callac.online"]}]}},"_links":{"self":[{"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/pages\/303","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/comments?post=303"}],"version-history":[{"count":4,"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/pages\/303\/revisions"}],"predecessor-version":[{"id":2126,"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/pages\/303\/revisions\/2126"}],"up":[{"embeddable":true,"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/pages\/2085"}],"wp:attachment":[{"href":"https:\/\/wordpress.callac.online\/index.php\/wp-json\/wp\/v2\/media?parent=303"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}