3138 résultats trouvés

Aller à la recherche avancée

par Logez Maxime
19 Déc 2023, 16:32
Forum : Questions en cours
Sujet : As.integer transforme la colonne en NAs
Réponses : 12
Vues : 395

Re: As.integer transforme la colonne en NAs

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...
par Logez Maxime
13 Déc 2023, 12:36
Forum : Questions en cours
Sujet : Problème de mise à jour de package sur Rstudio
Réponses : 3
Vues : 235

Re: Problème de mise à jour de package sur Rstudio

Bonjour,

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) ?

Bien cordialement,
Maxime
par Logez Maxime
07 Déc 2023, 20:52
Forum : Questions en cours
Sujet : Ifelse : comment conserver une partie des valeurs d'origine?
Réponses : 2
Vues : 213

Re: Ifelse : comment conserver une partie des valeurs d'origine?

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...
par Logez Maxime
22 Nov 2023, 13:52
Forum : Questions en cours
Sujet : Ajustement de données
Réponses : 5
Vues : 484

Re: Ajustement de données

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...
par Logez Maxime
17 Nov 2023, 14:22
Forum : Questions en cours
Sujet : Ajustement de données
Réponses : 5
Vues : 484

Re: Ajustement de données

Re,

je pense qu'il y a un problème d'indexation dans la fonction MlogL et la valeur maximale dans optimize :

Code : Tout sélectionner

MlogL <- function(x){
  result <- sapply(t, function(u) densitef(u, x))
  logL=-sum(log(result))
  return(logL)
}
opt<-optimize(MlogL,c(0,1e-4),tol=1e-20)

Cordialement,
Maxime
par Logez Maxime
17 Nov 2023, 09:12
Forum : Questions en cours
Sujet : Ajustement de données
Réponses : 5
Vues : 484

Re: Ajustement de données

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...
par Logez Maxime
09 Nov 2023, 09:32
Forum : Questions en cours
Sujet : lubridate ou timetk:extraction plage horaire a cheval sur 2 jours
Réponses : 5
Vues : 382

Re: lubridate ou timetk:extraction plage horaire a cheval sur 2 jours

Bonjour,

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.

Cordialement,
Maxiem
par Logez Maxime
08 Nov 2023, 08:25
Forum : Questions en cours
Sujet : lubridate ou timetk:extraction plage horaire a cheval sur 2 jours
Réponses : 5
Vues : 382

Re: lubridate ou timetk:extraction plage horaire a cheval sur 2 jours

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 %>...
par Logez Maxime
06 Oct 2023, 13:42
Forum : Questions en cours
Sujet : Supprimer des valeurs dans un tableau en fonction de leurs index
Réponses : 5
Vues : 595

Re: Supprimer des valeurs dans un tableau en fonction de leurs index

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...
par Logez Maxime
06 Sep 2023, 09:28
Forum : Questions en cours
Sujet : ggplot2, ajout d'une légende avec geom_abline
Réponses : 2
Vues : 419

Re: ggplot2, ajout d'une légende avec geom_abline

Bonjour, une possibilité : auxi <- data.frame(slope = c(7, 4), intercept = c(-5, .9), type = c("a", "b")) graphique + geom_point() + geom_smooth(method = lm, se=FALSE) + geom_abline(aes(slope = slope, intercept = intercept, linetype = type), data = auxi) + scale_linetype_manual(v...
par Logez Maxime
01 Sep 2023, 09:29
Forum : Questions en cours
Sujet : Utiliser une fonction S3 generic d'un autre package
Réponses : 3
Vues : 741

Re: Utiliser une fonction S3 generic d'un autre package

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...
par Logez Maxime
29 Aoû 2023, 06:42
Forum : Questions en cours
Sujet : Calcul OR, IC et pvalue à partir d'une régression logistique
Réponses : 2
Vues : 457

Re: Calcul OR, IC et pvalue à partir d'une régression logistique

Bonjour,

en cherchant un petit peu (et en anglais) sur le net je suis tombé la dessus :
https://www.danieldsjoberg.com/gtsummar ... ssion.html

Cordialement,
Maxime
par Logez Maxime
21 Aoû 2023, 09:21
Forum : Questions en cours
Sujet : utilisation de la fonction algA du package Metrology
Réponses : 4
Vues : 540

Re: utilisation de la fonction algA du package Metrology

re, Peut-être que le plus simple dans un cas comme celui-ci était de définir une fonction qui fasse exactement ce que tu cherchais : f <- function(x) { mn <- mean(x, na.rm = TRUE) s <- sd(x, na.rm = TRUE) al <- algA(x, na.rm = TRUE) res <- data.frame(mn = mn, s = s, mur = al$mu, sr = al$s) res } dta...
par Logez Maxime
21 Aoû 2023, 08:30
Forum : Questions en cours
Sujet : utilisation de la fonction algA du package Metrology
Réponses : 4
Vues : 540

Re: utilisation de la fonction algA du package Metrology

Bonjour, Avec unnest de tidyr par exemple : ini2<- ini %>% group_by(date)%>% reframe(m=mean(temp,na.rm=TRUE),ec=sd(temp,na.rm=TRUE),robust= as.data.frame(algA(temp))) %>% unnest(robust) # avec spread dta %>% group_by(z) %>% reframe(m = mean(cm), ec = sd(cm), robust = unlist(algA(cm))) %>% mutate(var...
par Logez Maxime
03 Aoû 2023, 07:34
Forum : Questions en cours
Sujet : Utiliser une fonction S3 generic d'un autre package
Réponses : 3
Vues : 741

Re: Utiliser une fonction S3 generic d'un autre package

Bonjour, Il y a quelque chose d'ambigu dans ce que tu cherches à faire. D'une part tu crées une fonction pour une classe d'objet dédiée à la fonction générique du package caret, mais dans le même temps tu ne veux pas importer le package parce que les utilisateurs n'en ont pas nécessairement besoin. ...

Aller à la recherche avancée

cron