Boa Tarde Prezado Max Deu certo, muito obrigado! Só não consigo gerar a planilha dos resultados do modelo calculado, segue a mensagem de erro:

write.xlsx(planilha, file = "resultscrs.xlsx") #grava arquivo Error in zip_internal(zipfile, files, recurse, compression_level, append = FALSE, : zip error: `Cannot add file `[Content_Types].xml` to archive `filed781d2c370e.xlsx`` in file `zip.c:394`

Atenciosamente Em sáb., 4 de abr. de 2020 às 11:30, Max Richard Verginio por (R-br) < r-br@listas.c3sl.ufpr.br> escreveu:

Bom dia Márcio Boareto,

Seu código funcionará, se alterar a linha:

rownames(planilha) <- dados [,1] # nomeas das linhas (empresas)

#por

rownames(planilha) <- dados[[1]] # nomeas das linhas (empresas)

### O diferença está na library usada para leitura da planilha dados.xlsx. Foram carregadas três `xlsx`, `openxlsx`e `readxl`. Mas foi utilizada apenas esta última, que carrega como tibble.

dados <- readxl::read_excel(path = "dados.xlsx", col_names = T)

Atenciosamente, Max Richard Verginio

_____________________________________ Sent from http://r-br.2285057.n4.nabble.com

_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.

-- *Márcio Boareto* *Administrador * *CRA-GO 15993* *Mestre em Gestão Organizacional pela UFG Catalão.* *Especialista em Gestão Financeira e Controladoria - UFG Catalão* *Graduado em Administração de Empresas - UFG Catalão* *64 98137-9049 whatsapp* *Lattes*:http://lattes.cnpq.br/8524063708922235 *ORCID: **https://orcid.org/0000-0003-0398-8774 <https://orcid.org/0000-0003-0398-8774>*