{"id":2966,"date":"2021-01-25T10:16:38","date_gmt":"2021-01-25T09:16:38","guid":{"rendered":"http:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/r-et-moodle-sarp-moodle\/"},"modified":"2022-01-05T22:41:53","modified_gmt":"2022-01-05T21:41:53","slug":"r-et-moodle-sarp-moodle","status":"publish","type":"page","link":"https:\/\/wordpress.callac.online\/index.php\/logiciels-mathematiques\/le-logiciel-r\/r-et-moodle-sarp-moodle\/","title":{"rendered":"R et Moodle : SARP.Moodle"},"content":{"rendered":"\n

SARP. Moodle : c’est quoi ?<\/h3>\n\n\n\n

SARP.Moodle<\/a> est un module pour R<\/a> \u00e9crit par Emmanuel Curis permettant de cr\u00e9er des questions Moodle utilisables dans des tests.<\/p>\n

On pourra alors rapidement cr\u00e9er des jeux de questions math\u00e9matiques dans lesquelles les param\u00e8tres prendront des valeurs diff\u00e9rentes<\/p>\n\n\n\n

Installation<\/h3>\n\n\n\n

Depuis R, lancer la commande suivante :<\/p>\n

install.packages(\"SARP.moodle\")<\/pre>\n
NB : Comme logiciel, vous pouvez utiliser Rstudio ou, comme moi, Sublime Text.<\/p>\n\n\n\n
Proposition de mod\u00e8le de fichier<\/h3>\n\n\n\n
Voici un fichier comment\u00e9 qui permet de comprendre les \u00e9tapes importantes d’un fichier utilisant SARP.Moodle.<\/p>\n
Attention : pour \u00e9viter des messages d’erreur, il faut s’assurer que le dossier o\u00f9 sera \u00e9crit le fichier xml existe !<\/span><\/p>\n\n\n\n
## SARP.moodle\n\n# appel \u00e0 la librairie\nlibrary( SARP.moodle )\n\n# pour fixer le dossier de travail\nsetwd(\"~\/\")\n\n#pour utiliser la fonction TeX()\nlibrary(latex2exp)\n\n# cr\u00e9ation du fichier fichierxml \nfichierxml <- debuter_xml.moodle( \"chemin\/nom_du_xml\" )\n\n# choix de la cat\u00e9gorie pour l'importation dans Moodle\ncategorie.moodle( \"SARP\/chemin_categorie\" )\n\n\n\n######################################\n#\n\n#----> On placera les questions ici\n\n#\n######################################\n\n\n\n#on cloture le fichier xml\nfinir_xml.moodle(fichierxml)\nremove(fichierxml)<\/pre>\n\n\n\n
Exemple :  numerique.moodle()<\/h3>\n\n\n\n
Dans cet exemple, on cr\u00e9e une s\u00e9rie de questions sur la somme de deux entiers naturels.<\/p>\n
Les r\u00e9ponses sont donc des valeurs num\u00e9riques<\/strong> saisies par l’utilisateur.<\/p>\n\n\n\n
\"\"<\/figure>\n\n\n\n
## SARP.moodle\n\nlibrary( SARP.moodle )\n\nfichierxml <- debuter_xml.moodle( \"addition\" )\ncategorie.moodle( \"SARP\/Exemples\" )\n\n########################################################## \n# cr\u00e9ation des questions\n#\nn.questions <- 50\nfor ( i in 1:n.questions ) {\n    a <- sample( 2:10, 1 )\n    b <- sample( 2:10, 1 )\n\n    texte <- paste0( \"\\\\( \", a, \" + \", b, \" = \\\\) ?\" )\n\n\n    numerique.moodle( titre = \"a + b = ?\",\n                      texte = texte,\n                      bonne.reponse = a + b, n.decimales = NA )\n\n}\n#\n# fin des questions\n########################################################## \n\nfinir_xml.moodle(fichierxml)\nremove(fichierxml)\n<\/pre>\n\n\n\n
Exemple : qcm.moodle()<\/h3>\n\n\n\n
Dans cet exemple, on cr\u00e9e une s\u00e9rie de questions de type QCM sur le calcul litt\u00e9ral.<\/p>\n
On pourra utiliser cette fonction pour un Vrai\/Faux, en ne gardant qu’une erreur !<\/p>\n\n\n\n
\"\"<\/figure>\n\n\n\n
## SARP.moodle\n\nlibrary( SARP.moodle )\n\nfichierxml <- debuter_xml.moodle( \"-ax+bx\" )\ncategorie.moodle( \"SARP\/Exemples\" )\n\n########################################################## \n# cr\u00e9ation des questions\n#\nn.questions <- 50\nfor ( i in 1:n.questions ) {\n    a <- sample( 2:10, 1 )\n    b <- sample( 2:10, 1 )\n\n    texte <- paste0( \"\\\\( \", -a, \"x + \", b, \"x = \\\\) ?\" )\n\n    reponse <- paste0(\"\\\\( \", -a+b, \"x \\\\)\" )\n    erreur1 <- paste0(\"\\\\( \", -a-b, \"x^2 \\\\)\" )\n    erreur2 <- paste0(\"\\\\( \", -a-b, \"x \\\\)\" )\n    erreur3 <- paste0(\"\\\\( \", -a+b, \"x^2 \\\\)\" )\n\n    qcm.moodle( titre = \"-ax + bx = ?\",\n                      texte = texte,\n                      bonnes.reponses = c(reponse), \n                      mauvaises.reponses = c(erreur1,erreur2,erreur3))\n}\n#\n# fin des questions\n########################################################## \n\nfinir_xml.moodle(fichierxml)\nremove(fichierxml)<\/pre>\n\n\n\n
Exemple : glisser_textes.moodle()<\/h3>\n\n\n\n
Dans cet exemple, on doit remettre dans l’ordre croissant quatre nombres.<\/p>\n
L’utilisateur devra faire glisser<\/strong> les quatre nombres dans les zones blanches.<\/p>\n
Dans l’\u00e9nonc\u00e9 de la question, il suffit de placer entre double crochets<\/strong> le texte des \u00e9tiquettes mobiles.<\/p>\n\n\n\n
\"\"<\/figure>\n\n\n\n
## SARP.moodle\n\nlibrary( SARP.moodle )\n\nfichierxml <- debuter_xml.moodle( \"ordre_croissant\" )\ncategorie.moodle( \"SARP\/Exemples\" )\n\n########################################################## \n# cr\u00e9ation des questions\n#\nn.questions <- 50\nfor ( i in 1:n.questions ) {\n\ta = sample(-20:-10,1)\n\tb = sample(-9:-5,1)\n\tc = sample(0,4,1)\n\td = sample(5:9,1)\n\n\tentete = paste0(\"Faire glisser les nombres pour remplir les zones blanches :\",\n\t\t\"<br \/>&nbsp\",\n\t\t\"<br \/>&nbsp\",\n\t\t\" [[\",a,\"]] < [[\",b,\"]] < [[\",c,\"]] < [[\",d,\"]] .\",\n\t\t\"<br \/> \",\n\t\t\"<br \/>&nbsp\",\n\t\t\"<br \/>&nbsp\",\n\t\t\"<br \/>&nbsp\")\n\n\tglisser_textes.moodle( entete, \n\t\t\t\ttitre = \"Ordre croissant\",\n\t\t\t\tinfini = FALSE,\n\t\t\t\tordre.aleatoire = TRUE, \n\t\t\t\tafficher.erreurs = TRUE)\n\n}\n#\n# fin des questions\n########################################################## \n\nfinir_xml.moodle(fichierxml)\nremove(fichierxml)<\/pre>\n\n\n\n
Exemple : question_libre.moodle()<\/h3>\n\n\n\n
Dans cet exemple, l’utilisateur va devoir rentrer le quotient et le reste de la division euclidienne.<\/p>\n\n\n\n
\"\"<\/figure>\n\n\n\n
## SARP.moodle\n\nlibrary( SARP.moodle )\n\nfichierxml <- debuter_xml.moodle( \"division\" )\ncategorie.moodle( \"SARP\/Exemples\" )\n\n########################################################## \n# cr\u00e9ation des questions\n#\nn.questions <- 20\nfor ( i in 1:n.questions ) {\n\ta = sample(50:100,1)\n\tb = sample(6:9,1)\n    q = a %\/%b #quotient\n    r = a %%b #Reste\n\n\n\tentete = paste0(\"Soit \\\\( A = \\\\dfrac{\",a,\"}{\",b,\"} \\\\). \",\n\t\t\"<br \/>\\n\",\n\t\t\"D'apr\u00e8s la division euclidienne\",\n\t\t\"<br \/>\\n\")\n\tquestion_libre.moodle( titre = \"b*q+r\",\n\t\ttexte.intro = entete,\n\t\ttextes.avant = list( paste0(\"\\\\(\",a,\" = \",b,\" \\\\times \\\\)\"), \n\t\t\t\"\\\\( + \\\\)\"),\n\t\ttexte.final =  \".\",\n\t\treponses = list( q,r ) )\n}\n#\n# fin des questions\n########################################################## \n\nfinir_xml.moodle(fichierxml)\nremove(fichierxml)<\/pre>\n\n\n\n
Exemple : utilisation d’image dans les \u00e9nonc\u00e9s<\/h3>\n\n\n\n
Dans cet exemple, on cr\u00e9e des graphiques : chacun contient un point dans un rep\u00e8re.<\/p>\n
On va profiter de chaque dessin pour r\u00e9aliser plusieurs questions.<\/p>\n
Attention, cet exemple ne fonctionnera que si certains dossiers existent.<\/p>\n