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.
_______________________________________________ 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.