title: Homogeneity of Variance Test for RCB Design in R
body: <p>I have the following query, I want to apply a test for homogeneity of variances for a completely random design with blocks.
  I tried levene but it is not acceptable with 2 factors</p>
  <pre class="lang-r prettyprint-override"><code>library(car)
  library(tibble)
  
  tb = tibble(&quot;treat&quot; = factor(x = rep(1:3,c(4,4,4) ),
                               labels = c(&quot;disen 1&quot;,&quot;disen 2&quot;,&quot;disen 3&quot;)),
              &quot;bloque&quot; = factor(x = c(rep(1:4,3)),
                                labels = c(&quot;NE&quot;,&quot;NW&quot;,&quot;SE&quot;,&quot;SW&quot;)),
              &quot;value&quot; = c(250,350,219,375,
                          400,525,390,580,
                          275,340,200,310))
  </code></pre>
  <p>here I apply the levene test</p>
  <pre class="lang-r prettyprint-override"><code>leveneTest(value ~ treat*bloque,tb) # no show result
  </code></pre>
  <p>is there any other statistical test for homogeneity of variances for RCBD?</p>