[R-br] Simular números

classic Classic list List threaded Threaded
4 messages Options
Reply | Threaded
Open this post in threaded view
|

[R-br] Simular números

R-br mailing list
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


_______________________________________________
R-br mailing list
[hidden email]
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.
Reply | Threaded
Open this post in threaded view
|

Re: [R-br] Simular números

R-br mailing list
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) <[hidden email]> 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

_______________________________________________
R-br mailing list
[hidden email]
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
[hidden email]
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.
Reply | Threaded
Open this post in threaded view
|

Re: [R-br] Simular números

R-br mailing list
Veja sobre a distribuição multinomial!

 > rmultinom(n = 2, size = 100, prob = rep(1/4, 4))

Esse exemplo simula duas amostras que somam 100... varie as probabilidades!

att,
FH

On 3/12/19 7:54 AM, Rodrigo Ângelo por (R-br) wrote:

> 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) <
> [hidden email]> 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
>> [hidden email]
>> 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
> [hidden email]
> 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
[hidden email]
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 fornea cdigo mnimo reproduzvel.
Reply | Threaded
Open this post in threaded view
|

Re: [R-br] Simular números

R-br mailing list
Obrigada, Fernando!

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


De: R-br <[hidden email]> em nome de Fernando H Toledo por (R-br) <[hidden email]>
Enviado: terça-feira, 12 de março de 2019 14:19
Para: [hidden email]
Cc: Fernando H Toledo
Assunto: Re: [R-br] Simular números
 
Veja sobre a distribuição multinomial!

 > rmultinom(n = 2, size = 100, prob = rep(1/4, 4))

Esse exemplo simula duas amostras que somam 100... varie as probabilidades!

att,
FH

On 3/12/19 7:54 AM, Rodrigo Ângelo por (R-br) wrote:
> 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) <
> [hidden email]> 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
>> [hidden email]
>> 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
> [hidden email]
> 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
[hidden email]
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 fornea cdigo mnimo reproduzvel.

_______________________________________________
R-br mailing list
[hidden email]
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.