> # Test de Tukey para el factor 'riego' > tukey_riego <- HSD.test(modelo, "riego", group = TRUE) > print(tukey_riego) $statistics MSerror Df Mean CV MSD 24.48249 148 56.36487 8.778479 1.59671 $parameters test name.t ntr StudentizedRange alpha Tukey riego 2 2.794659 0.05 $means spad_29 std r se Min Max Q25 Q50 Q75 irrigado 56.65773 4.97906 75 0.5713433 43.5 64.9 53.6 57.2 60.6 sequia 56.07200 4.91670 75 0.5713433 43.9 65.5 53.2 56.5 59.4 $comparison NULL $groups spad_29 groups irrigado 56.65773 a sequia 56.07200 a attr(,"class") [1] "group" > > # Test de Tukey para el factor 'geno' > tukey_geno <- HSD.test(modelo, "geno", group = TRUE) > print(tukey_geno) NULL >

if (m_creature->GetEntry() == NPC_ASH || m_creature->GetEntry() == NPC_ADA)
        {
            // check if the event is already done
            if (m_uiEventTimer)
            {
                if (m_uiEventTimer <= uiDiff)
                {
                    m_uiEventTimer = 0;