Messagepar Michel Carpentier » 09 Mai 2018, 09:48
Bonjour
je cherche à extraire de la fonction "gageRR(design,tolerance=0.0148)" "library(qualityTools)"
les valeurs "StudyVarContrib " et "P/T Ratio" pour le "totalRR "
je ne m'en sors pas avec de que j'en sais sur les résultats d'autres fonctions. exemples :
pour n'avoir que la pvalue du test de shapiro, nous devons faire "shapiro.test(data)[2]"
pour obtenir les valeurs aberrantes je fais"boxplot(data)$out" "library(rpart)"
merci de votre aide.
cordialement
Michel Carpentier
voici toutes les résultats obtenus avec cette fonction gageRR
>gageRR(design,tolerance=0.0148)
AnOVa Table - crossed Design
Df Sum Sq Mean Sq F value Pr(>F)
Operator 3 0.00000 0.000001 19.328 2.73e-10 ***
Part 9 0.03464 0.003849 81089.529 < 2e-16 ***
Operator:Part 27 0.00000 0.000000 0.255 1
Residuals 120 0.00001 0.000000
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
----------
AnOVa Table Without Interaction - crossed Design
Df Sum Sq Mean Sq F value Pr(>F)
Operator 3 0.00000 0.000001 22.39 5.36e-12 ***
Part 9 0.03464 0.003849 93935.76 < 2e-16 ***
Residuals 147 0.00001 0.000000
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
----------
Gage R&R
VarComp VarCompContrib Stdev StudyVar StudyVarContrib P/T Ratio
totalRR 6.29e-08 2.61e-04 0.000251 0.001505 0.01617 0.1017
repeatability 4.10e-08 1.70e-04 0.000202 0.001215 0.01305 0.0821
reproducibility 2.19e-08 9.11e-05 0.000148 0.000888 0.00954 0.0600
Operator 2.19e-08 9.11e-05 0.000148 0.000888 0.00954 0.0600
Operator:Part 0.00e+00 0.00e+00 0.000000 0.000000 0.00000 0.0000
Part to Part 2.41e-04 1.00e+00 0.015510 0.093063 0.99987 6.2880
totalVar 2.41e-04 1.00e+00 0.015512 0.093075 1.00000 6.2888
---
* Contrib equals Contribution in %
**Number of Distinct Categories (truncated signal-to-noise-ratio) = 87