{"id":1614,"date":"2023-07-25T15:47:14","date_gmt":"2023-07-25T15:47:14","guid":{"rendered":"https:\/\/statorials.org\/ar\/%d9%88%d9%8a%d9%84%d8%b4-%d8%a7%d9%94%d9%86%d9%88%d9%81%d8%a7-%d9%81%d9%8a-%d8%b5\/"},"modified":"2023-07-25T15:47:14","modified_gmt":"2023-07-25T15:47:14","slug":"%d9%88%d9%8a%d9%84%d8%b4-%d8%a7%d9%94%d9%86%d9%88%d9%81%d8%a7-%d9%81%d9%8a-%d8%b5","status":"publish","type":"post","link":"https:\/\/statorials.org\/ar\/%d9%88%d9%8a%d9%84%d8%b4-%d8%a7%d9%94%d9%86%d9%88%d9%81%d8%a7-%d9%81%d9%8a-%d8%b5\/","title":{"rendered":"\u0643\u064a\u0641\u064a\u0629 \u0625\u062c\u0631\u0627\u0621 \u062a\u062d\u0644\u064a\u0644 \u0648\u064a\u0644\u0634 anova \u0641\u064a r (\u062e\u0637\u0648\u0629 \u0628\u062e\u0637\u0648\u0629)"},"content":{"rendered":"

<\/p>\n

\n

\u064a\u0639\u062f \u062a\u062d\u0644\u064a\u0644 \u0648\u064a\u0644\u0634 ANOVA<\/strong> \u0628\u062f\u064a\u0644\u0627\u064b \u0644\u062a\u062d\u0644\u064a\u0644 \u0627\u0644\u062a\u0628\u0627\u064a\u0646 \u0627\u0644\u0646\u0645\u0648\u0630\u062c\u064a \u0623\u062d\u0627\u062f\u064a \u0627\u0644\u0627\u062a\u062c\u0627\u0647<\/a> \u0639\u0646\u062f\u0645\u0627 \u0644\u0627 \u064a\u062a\u0645 \u0627\u0633\u062a\u064a\u0641\u0627\u0621 \u0627\u0641\u062a\u0631\u0627\u0636 \u0627\u0644\u0645\u0633\u0627\u0648\u0627\u0629 \u0641\u064a \u0627\u0644\u062a\u0628\u0627\u064a\u0646\u0627\u062a<\/a> .<\/span><\/p>\n

\u064a\u0648\u0636\u062d \u0627\u0644\u0645\u062b\u0627\u0644 \u0627\u0644\u062a\u0627\u0644\u064a \u062e\u0637\u0648\u0629 \u0628\u062e\u0637\u0648\u0629 \u0643\u064a\u0641\u064a\u0629 \u062a\u0646\u0641\u064a\u0630 Welch’s ANOVA \u0641\u064a R.<\/span><\/p>\n

\u0627\u0644\u062e\u0637\u0648\u0629 1: \u0625\u0646\u0634\u0627\u0621 \u0627\u0644\u0628\u064a\u0627\u0646\u0627\u062a<\/strong><\/span><\/h3>\n

\u0644\u062a\u062d\u062f\u064a\u062f \u0645\u0627 \u0625\u0630\u0627 \u0643\u0627\u0646\u062a \u062b\u0644\u0627\u062b \u062a\u0642\u0646\u064a\u0627\u062a \u062f\u0631\u0627\u0633\u0629 \u0645\u062e\u062a\u0644\u0641\u0629 \u062a\u0624\u062f\u064a \u0625\u0644\u0649 \u0646\u062a\u0627\u0626\u062c \u0627\u0645\u062a\u062d\u0627\u0646\u0627\u062a \u0645\u062e\u062a\u0644\u0641\u0629\u060c \u064a\u0642\u0648\u0645 \u0627\u0644\u0623\u0633\u062a\u0627\u0630 \u0628\u062a\u0639\u064a\u064a\u0646 10 \u0637\u0644\u0627\u0628 \u0628\u0634\u0643\u0644 \u0639\u0634\u0648\u0627\u0626\u064a \u0644\u0627\u0633\u062a\u062e\u062f\u0627\u0645 \u0643\u0644 \u062a\u0642\u0646\u064a\u0629 (\u0627\u0644\u062a\u0642\u0646\u064a\u0629 \u0623 \u0623\u0648 \u0628 \u0623\u0648 \u062c) \u0644\u0645\u062f\u0629 \u0623\u0633\u0628\u0648\u0639\u060c \u062b\u0645 \u064a\u0639\u0637\u064a \u0643\u0644 \u0637\u0627\u0644\u0628 \u0627\u062e\u062a\u0628\u0627\u0631\u064b\u0627 \u0628\u0646\u0641\u0633 \u0627\u0644\u0635\u0639\u0648\u0628\u0629.<\/span><\/p>\n

\u0648\u0641\u064a\u0645\u0627 \u064a\u0644\u064a \u0646\u062a\u0627\u0626\u062c \u0627\u0645\u062a\u062d\u0627\u0646\u0627\u062a \u0627\u0644\u0637\u0644\u0627\u0628 \u0627\u0644\u062b\u0644\u0627\u062b\u064a\u0646:<\/span><\/p>\n

 #create data frame<\/span>\ndf <-data. frame<\/span> (group = rep<\/span> (c(' A<\/span> ', ' B<\/span> ', ' C<\/span> '), each<\/span> =10),\n                score = c(64, 66, 68, 75, 78, 94, 98, 79, 71, 80,\n                          91, 92, 93, 85, 87, 84, 82, 88, 95, 96,\n                          79, 78, 88, 94, 92, 85, 83, 85, 82, 81))\n\n#view first six rows of data frame\n<\/span>head(df)\n\n   group score\n1 to 64\n2 to 66\n3 to 68\n4 to 75\n5 to 78\n6 to 94<\/strong><\/pre>\n
 \u0627\u0644\u062e\u0637\u0648\u0629 \u0627\u0644\u062b\u0627\u0646\u064a\u0629: \u0627\u062e\u062a\u0628\u0627\u0631 \u0627\u0644\u0641\u0631\u0648\u0642 \u0627\u0644\u0645\u062a\u0633\u0627\u0648\u064a\u0629<\/strong><\/span><\/h3>\n
 \u0628\u0639\u062f \u0630\u0644\u0643\u060c \u064a\u0645\u0643\u0646\u0646\u0627 \u0625\u062c\u0631\u0627\u0621 \u0627\u062e\u062a\u0628\u0627\u0631 \u0628\u0627\u0631\u062a\u0644\u064a\u062a<\/a> \u0644\u062a\u062d\u062f\u064a\u062f \u0645\u0627 \u0625\u0630\u0627 \u0643\u0627\u0646\u062a \u0627\u0644\u062a\u0628\u0627\u064a\u0646\u0627\u062a \u0628\u064a\u0646 \u0643\u0644 \u0645\u062c\u0645\u0648\u0639\u0629 \u0645\u062a\u0633\u0627\u0648\u064a\u0629.<\/span><\/p>\n
 \u0625\u0630\u0627 \u0643\u0627\u0646\u062a \u0627\u0644\u0642\u064a\u0645\u0629 p<\/a> \u0644\u0625\u062d\u0635\u0627\u0626\u064a\u0627\u062a \u0627\u0644\u0627\u062e\u062a\u0628\u0627\u0631 \u0623\u0642\u0644 \u0645\u0646 \u0645\u0633\u062a\u0648\u0649 \u0645\u0639\u064a\u0646 \u0645\u0646 \u0627\u0644\u0623\u0647\u0645\u064a\u0629 (\u0645\u062b\u0644 \u03b1 = 0.05)\u060c \u0641\u064a\u0645\u0643\u0646\u0646\u0627 \u0631\u0641\u0636 \u0641\u0631\u0636\u064a\u0629 \u0627\u0644\u0639\u062f\u0645 \u0648\u0646\u0633\u062a\u0646\u062a\u062c \u0623\u0646\u0647 \u0644\u064a\u0633 \u0643\u0644 \u0627\u0644\u0645\u062c\u0645\u0648\u0639\u0627\u062a \u0644\u062f\u064a\u0647\u0627 \u0646\u0641\u0633 \u0627\u0644\u062a\u0628\u0627\u064a\u0646.<\/span><\/p>\n
 \u0644\u0625\u062c\u0631\u0627\u0621 \u0627\u062e\u062a\u0628\u0627\u0631 Bartlett\u060c \u064a\u0645\u0643\u0646\u0646\u0627 \u0627\u0633\u062a\u062e\u062f\u0627\u0645 \u0627\u0644\u062f\u0627\u0644\u0629 bartlett.test<\/strong> \u0641\u064a \u0642\u0627\u0639\u062f\u0629 R\u060c \u0648\u0627\u0644\u062a\u064a \u062a\u0633\u062a\u062e\u062f\u0645 \u0627\u0644\u0635\u064a\u063a\u0629 \u0627\u0644\u062a\u0627\u0644\u064a\u0629:<\/span><\/p>\n
 \u0627\u062e\u062a\u0628\u0627\u0631 \u0628\u0627\u0631\u062a\u0644\u064a\u062a (\u0627\u0644\u0635\u064a\u063a\u0629 \u0648\u0627\u0644\u0628\u064a\u0627\u0646\u0627\u062a)<\/strong><\/span><\/p>\n
 \u0625\u0644\u064a\u0643 \u0643\u064a\u0641\u064a\u0629 \u0627\u0633\u062a\u062e\u062f\u0627\u0645 \u0647\u0630\u0647 \u0627\u0644\u0648\u0638\u064a\u0641\u0629 \u0641\u064a \u0645\u062b\u0627\u0644\u0646\u0627:<\/span><\/p>\n
 #perform Bartlett's test\n<\/span>bartlett. test<\/span> (score ~ group, data = df)\n\n\tBartlett test of homogeneity of variances\n\ndata: score by group\nBartlett's K-squared = 8.1066, df = 2, p-value = 0.01737\n<\/strong><\/pre>\n
 \u0627\u0644\u0642\u064a\u0645\u0629 p ( .01737<\/strong> ) \u0644\u0627\u062e\u062a\u0628\u0627\u0631 \u0628\u0627\u0631\u062a\u0644\u064a\u062a \u0623\u0642\u0644 \u0645\u0646 \u03b1 = .05\u060c \u0645\u0645\u0627 \u064a\u0639\u0646\u064a \u0623\u0646\u0647 \u064a\u0645\u0643\u0646\u0646\u0627 \u0631\u0641\u0636 \u0641\u0631\u0636\u064a\u0629 \u0627\u0644\u0639\u062f\u0645 \u0627\u0644\u0642\u0627\u0626\u0644\u0629 \u0628\u0623\u0646 \u0643\u0644 \u0645\u062c\u0645\u0648\u0639\u0629 \u0644\u0647\u0627 \u0646\u0641\u0633 \u0627\u0644\u062a\u0628\u0627\u064a\u0646.<\/span><\/p>\n
 \u0648\u0628\u0627\u0644\u062a\u0627\u0644\u064a\u060c \u064a\u062a\u0645 \u0627\u0646\u062a\u0647\u0627\u0643 \u0627\u0641\u062a\u0631\u0627\u0636 \u0627\u0644\u0645\u0633\u0627\u0648\u0627\u0629 \u0641\u064a \u0627\u0644\u062a\u0628\u0627\u064a\u0646\u0627\u062a \u0648\u064a\u0645\u0643\u0646\u0646\u0627 \u0627\u0644\u0645\u0636\u064a \u0642\u062f\u0645\u064b\u0627 \u0641\u064a \u062a\u062d\u0644\u064a\u0644 \u0627\u0644\u062a\u0628\u0627\u064a\u0646 (ANOVA) \u0627\u0644\u062e\u0627\u0635 \u0628\u0640 Welch.<\/span><\/p>\n
 \u0627\u0644\u062e\u0637\u0648\u0629 3: \u0625\u062c\u0631\u0627\u0621 \u062a\u062d\u0644\u064a\u0644 \u0627\u0644\u062a\u0628\u0627\u064a\u0646 (ANOVA) \u0644\u0640 \u0648\u0644\u0634<\/strong><\/span><\/h3>\n
 \u0644\u0625\u062c\u0631\u0627\u0621 \u062a\u062d\u0644\u064a\u0644 \u0627\u0644\u062a\u0628\u0627\u064a\u0646 (ANOVA) \u0627\u0644\u062e\u0627\u0635 \u0628\u0640 Welch \u0641\u064a R\u060c \u064a\u0645\u0643\u0646\u0646\u0627 \u0627\u0633\u062a\u062e\u062f\u0627\u0645 \u0627\u0644\u062f\u0627\u0644\u0629 R base oneway.test()<\/strong> \u200e \u0643\u0645\u0627 \u064a\u0644\u064a:<\/span><\/p>\n
 #perform Welch's ANOVA\n<\/span>oneway. test<\/span> (score ~ group, data = df, var. equal<\/span> = FALSE<\/span> )\n\n\tOne-way analysis of means (not assuming equal variances)\n\ndata: score and group\nF = 5.3492, num df = 2.00, denom df = 16.83, p-value = 0.01591\n<\/strong><\/pre>\n
 \u0627\u0644\u0642\u064a\u0645\u0629 p \u0627\u0644\u0625\u062c\u0645\u0627\u0644\u064a\u0629 ( 0.01591<\/strong> ) \u0644\u062c\u062f\u0648\u0644 ANOVA \u0623\u0642\u0644 \u0645\u0646 \u03b1 = 0.05\u060c \u0645\u0645\u0627 \u064a\u0639\u0646\u064a \u0623\u0646\u0647 \u064a\u0645\u0643\u0646\u0646\u0627 \u0631\u0641\u0636 \u0627\u0644\u0641\u0631\u0636\u064a\u0629 \u0627\u0644\u0635\u0641\u0631\u064a\u0629 \u0627\u0644\u0642\u0627\u0626\u0644\u0629 \u0628\u0623\u0646 \u0646\u062a\u0627\u0626\u062c \u0627\u0644\u0627\u0645\u062a\u062d\u0627\u0646 \u0645\u062a\u0633\u0627\u0648\u064a\u0629 \u0628\u064a\u0646 \u062a\u0642\u0646\u064a\u0627\u062a \u0627\u0644\u062f\u0631\u0627\u0633\u0629 \u0627\u0644\u062b\u0644\u0627\u062b\u0629.<\/span><\/p>\n
 \u064a\u0645\u0643\u0646\u0646\u0627 \u0628\u0639\u062f \u0630\u0644\u0643 \u0625\u062c\u0631\u0627\u0621 \u0627\u062e\u062a\u0628\u0627\u0631 \u0644\u0627\u062d\u0642 \u0644\u062a\u062d\u062f\u064a\u062f \u0645\u062a\u0648\u0633\u0637\u0627\u062a \u0627\u0644\u0645\u062c\u0645\u0648\u0639\u0629 \u0627\u0644\u0645\u062e\u062a\u0644\u0641\u0629. \u0627\u0631\u062c\u0639 \u0625\u0644\u0649 \u0627\u0644\u0628\u0631\u0627\u0645\u062c \u0627\u0644\u062a\u0639\u0644\u064a\u0645\u064a\u0629 \u0627\u0644\u062a\u0627\u0644\u064a\u0629 \u0644\u0645\u0639\u0631\u0641\u0629 \u0643\u064a\u0641\u064a\u0629 \u0625\u062c\u0631\u0627\u0621 \u0627\u062e\u062a\u0628\u0627\u0631\u0627\u062a \u0644\u0627\u062d\u0642\u0629 \u0645\u062e\u062a\u0644\u0641\u0629 \u0641\u064a R:<\/span><\/p>\n