Boa noite, estou tentando fazer a Anova e o teste Sk porém no fim ele gera um erro, alguém faz ideia do que seja?

#ANAVA#

mDAP <- aov(DAP~Bloco+Trat, data=dados)

class(mDAP)

anova(mDAP)

summary(mDAP)

summary.lm(mDAP)

#TESTE DE NORMALIDADE#

shapiro.test(dados$DAP)

shapiro.test(residuals(mDAP))

library(ScottKnott)

#TESTE SCOTT-KNOTT#

as.factor(dados$Bloco)

as.factor(dados$Trat)

sk.DAP=SK(x=dados, y=dados$DAP, model="dados$DAP~dados$Bloco+dados$Trat",which="dados$Trat",sig.level=0.05)

summary(sk.DAP)

Erro em SK.aov(x = av, which = which, id.trim = id.trim, sig.level = sig.level) : 
  No factors in the fitted model!
Além disso: Mensagens de aviso perdidas:
1: In replications(paste("~", xx), data = mf) :
  non-factors ignored: dados$Bloco
2: In replications(paste("~", xx), data = mf) :
  non-factors ignored: dados$Trat

Kalill José Viana da Páscoa

Engenheiro Florestal

Mestrando em Engenharia Florestal
Universidade Federal de Lavras

Rua Geraldo dos Passos, 81

Água Limpa, Lavras-MG

CEP: 37200-000

(35)3821-6833

(35)9152-4828

(35)9928-6574