re, Quand tu regardes en détail ce qui se passe, il te dit que la jointure s'est faite sur les colonnes RFID, traitement, groupe, sexe. Dans l'exemple que tu as donné, le RFID est le même dans les deux tableaux, mais pas le traitement. Dans le tableau "b", celui qui sert de référence pour ...
Bonjour, Je suis désolé mais en lisant ton mail je ne vois pas où est la question, je n'arrive pas à voir où ta jointure est "mauvaise". J'utilise les fonction lef_join et right_join de dplyr et je viens de comprendre que pour un tableau de 256 lignes. Il doit manquer un bout de la phrase ...
Bonjour Eric, Je n'ai pas la solution à ton problème, par contre pour ce qui est des séquences des événements quand R se lance, tu devrais trouver des informations ici : https://cran.r-project.org/web/packages/startup/vignettes/startup-intro.html#:~:text=Rprofile%20file%20if%20it%20exists,time%20you...
Bonjour, Parce que ce sont des logiques différentes. Quand tu fais test %>% mutate("DTIR-101" = as.integer("DTIR-101")) tu ne fais pas appel à la variable (colonne) DTIR-101 mais à la chaîne de caractère "DTIR-101", et transformer cette chaîne de caractères en nombre, c...
Question bête mais est-ce que les versions de R (et non R-studio) sont les mêmes entre les deux ordis ? Sinon est-ce que sur le W10 tu as essayé de changer le serveur pour la gestion des packages (options - packages - management) ?
Bonjour, Le souci vient de l'utilisation du ifelse sur un tibble. Normalement c'est plutôt fait pour un vecteur, donc plutôt l'appliquer colonne par colonne (il est toujours plus efficace en R de travailler par colonne que par ligne). jo <- o %>% mutate_all(~ifelse(. > 0, 0 , .)) Mais le plus simple...
Bonjour, Le code renvoie un warning qui dit que les longueurs d'objets ne sont pas les mêmes. Par rapport aux codes précédents, il semble manquer un sapply dans myf. Pour ce qui est des valeurs initiales, non je ne connais pas de technique idéale, a part essayer dans la mesure du possible que mettre...
Bonjour, Il semble qu'il te manque une accolade pour ta boucle : for (index in 1:length(Dseq)) { D_value <- Dseq[index] result <- sapply(t, function(t) f(t, D_value)) datatemp=cbind(data,result) res[index]=mean((datatemp$y-datatemp$result)^2) } Si tu ne la mets pas seule la première ligne sera exécu...
Juste pour signaler que le code que j'ai fourni est entièrement basé sur lubridate pour la gestion du temps (date, heure, etc.), avec des fonctions comme ymd_hms, as_date, interval et %within%. Le reste ce sont des fonctions de dplyr déjà mentionnées pour la plupart.
Bonjour, je ne suis pas très familier avec lubridate, mais voilà une possibilité : # pour l'exemple : dta <- data.frame(time = seq(ymd_hms("20230201 000000"), ymd_hms("20230205 230000"), by = "hour")) # si on définit une nuit comme allant de 22h00 à 08h00 auxi <- dta %>...
Bonjour, Il te manque une virgule après la parenthèse : DATA_WO=DATA[c(-outlier_inj_WT_idx), ] D'ailleurs tu n'as pas besoin de c(-outlier...), tu peux directement mettre -outlier_inj_WT_idx. Autre remarque en passant, il est souvent conseillé d'effectuer tes affectations avec une flèche plutôt qu'u...
Bonjour, Là ou je pensait que cela pourrait poser problème, serait si l'utilisateur charge caret, puis mon package, et ensuite ferait appel à predict() avec une méthode du package caret, est-ce que cela ne pose pas de problème à ce moment là ? Tu as raison, ça poserait problème parce que dans ce cas...