Olá, Angélica Você tem mais alguma restrição sobre esses números? O código abaixo gera 4 números que somam 100 segundo uma distribuição uniforme. qtd_observacoes <- 10 qtd_numeros <- 4 df <- data.frame(col1=double(qtd_observacoes), col2=double(qtd_observacoes), col3=double(qtd_observacoes), col4=double(qtd_observacoes)) for (i in 1:qtd_observacoes) { soma = 0; for(j in 1:(qtd_numeros-1)) { valor = runif(1, 0, (100-soma)) df[i,j] <- valor soma = soma + valor } df[i,qtd_numeros] <- 100 - soma } Atenciosamente, Rodrigo de Castro Ângelo Em ter, 12 de mar de 2019 às 10:33, Angélica Ricarte por (R-br) < r-br@listas.c3sl.ufpr.br> escreveu:
Prezados, bom dia.
Por gentileza, peço ajuda para simular 4 números de forma que a soma dê 100, como na tabela abaixo, por exemplo. Qual o comando e/ou pacote posso utilizar?
Comun. Execul. Planej. Analis. TOTAL A1 21,26 20,45 28,74 29,55 100 A2 A3 A4 A5 A6 A7 A8 A9 A10
Grata, aguardo retorno.
Att.
*Angélica Ricarte da Silva Batista*
Autarquia Educacional do Belo Jardim/Faculdade do Belo Jardim - AEB/FBJ Rodovia PE-166, Km 05 - BR, Belo Jardim - PE Telefone/Phone: +55 (81) 3726-1800
CV <http://lattes.cnpq.br/0601801978475226>
<http://lattes.cnpq.br/0601801978475226> _______________________________________________ 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.