Re: [R-br] [STAT-MATH] NÚMEROS PRIMOS NO R

Olá, não sei um algoritmo rápido, mas o caminho se passa por: 1. Testar até o último inteiro menor ou igual à raíz quadrada do número em questão (Acredito ser impossível existir um número divisível por algum número maior que este limite) 2. Ir armazenando os números primos encontrados e testar somente dentro desta lista (Lembrei da fatoração, geralmente utilizamos números primos quando fazemos isto) Acredito que devam existir mais maneiras de otimizar, teria que debruçar sobre o problema com calma []s Leonard de Assis assis <dot> leonard <at> gmail <dot> com Em 22/08/2012 11:35, Francisco Eduardo de Castro escreveu:
Bom dia,
Alguém sabe como fazer um programa no R que encontre os 10 mil primeiros números primos, cuja velocidade de execução da tarefa seja de até 15 segundos?
att,
Francisco __._,_.___ <mailto:dumat84@yahoo.com.br?subject=Res%3A%20N%DAMEROS%20PRIMOS%20NO%20R> | através de email <mailto:STAT-MATH@yahoogrupos.com.br?subject=Res%3A%20N%DAMEROS%20PRIMOS%20NO%20R> | Responder através da web <http://br.groups.yahoo.com/group/STAT-MATH/post;_ylc=X3oDMTJxaTNpbmhvBF9TAzk3NDkwNDM3BGdycElkAzMyNTIxNDUEZ3Jwc3BJZAMyMTM3MTExNjA1BG1zZ0lkAzI1NzU2BHNlYwNmdHIEc2xrA3JwbHkEc3RpbWUDMTM0NTY1NzQwOA--?act=reply&messageNum=25756> | Adicionar um novo tópico <http://br.groups.yahoo.com/group/STAT-MATH/post;_ylc=X3oDMTJlMmFqbGU5BF9TAzk3NDkwNDM3BGdycElkAzMyNTIxNDUEZ3Jwc3BJZAMyMTM3MTExNjA1BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTM0NTY1NzQwOA-->
Mensagens neste tópico <http://br.groups.yahoo.com/group/STAT-MATH/message/25756;_ylc=X3oDMTM2YTRuZ201BF9TAzk3NDkwNDM3BGdycElkAzMyNTIxNDUEZ3Jwc3BJZAMyMTM3MTExNjA1BG1zZ0lkAzI1NzU2BHNlYwNmdHIEc2xrA3Z0cGMEc3RpbWUDMTM0NTY1NzQwOAR0cGNJZAMyNTc1Ng--> (1) Atividade nos últimos dias:
* Novos usuários <http://br.groups.yahoo.com/group/STAT-MATH/members;_ylc=X3oDMTJmbGdkY2poBF9TAzk3NDkwNDM3BGdycElkAzMyNTIxNDUEZ3Jwc3BJZAMyMTM3MTExNjA1BHNlYwN2dGwEc2xrA3ZtYnJzBHN0aW1lAzEzNDU2NTc0MDg-?o=6> 17
Quem procura, acha. Encontre a pessoa ideal online <http://global.ard.yahoo.com/SIG=15m70od66/M=758712.15012700.14784528.12960164/D=brclubs/S=2137111605:MKP1/Y=BR/EXP=1345664610/L=e2cd2ec6-ec80-11e1-a5eb-cbc88b3d1dd0/B=NnBCKdBDRok-/J=1345657410370373/K=FtikA1QIa6cbozzTN6bF4Q/A=6630596/R=0/id=mkp1/SIG=135cat74t/*http://tracking.parperfeito.com.br/ppbanner/bannerTracker?originId=1&identifierId=756977&actionId=1>
------------------------------------------------------------------------ Ainda dá tempo de encontrar companhia para passar o Dia dos Namorados! <http://global.ard.yahoo.com/SIG=15mi8vfse/M=830568.15128937.14797398.12960164/D=brclubs/S=2137111605:MKP1/Y=BR/EXP=1345664610/L=e2cd2ec6-ec80-11e1-a5eb-cbc88b3d1dd0/B=N3BCKdBDRok-/J=1345657410370373/K=FtikA1QIa6cbozzTN6bF4Q/A=6630595/R=0/id=mkp1/SIG=135ccghg9/*http://tracking.parperfeito.com.br/ppbanner/bannerTracker?originId=1&identifierId=756976&actionId=1>
------------------------------------------------------------------------ Ofertas HP <http://global.ard.yahoo.com/SIG=15mjg3tka/M=833022.15256589.14900301.12796144/D=brclubs/S=2137111605:MKP1/Y=BR/EXP=1345664610/L=e2cd2ec6-ec80-11e1-a5eb-cbc88b3d1dd0/B=NXBCKdBDRok-/J=1345657410370373/K=FtikA1QIa6cbozzTN6bF4Q/A=6722901/R=0/id=mkp1/SIG=12cnorq5l/*http://ia.nspmotion.com/click/?cap=87856&c=13059&r=1345657410370373&t=true>
Trocar para: Só Texto <mailto:STAT-MATH-traditional@yahoogrupos.com.br?subject=Mudar%20Formato%20de%20Envio:%20Tradicional>, Resenha Diária <mailto:STAT-MATH-digest@yahoogrupos.com.br?subject=Envio%20de%20email:%20Resenha> . Sair do grupo <mailto:STAT-MATH-unsubscribe@yahoogrupos.com.br?subject=Sair%20do%20grupo> . Termos de uso <http://br.yahoo.com/info/utos.html> .
__,_._,___

Que coincidência! Eu terminei um destes há pouco. Exatamente para 10000. Não sei se são 15 segundos porque depende da máquina. Em Wed, 22 Aug 2012 15:37:20 -0300 Leonard de Assis <assis.leonard@gmail.com> escreveu:
Olá,
não sei um algoritmo rápido, mas o caminho se passa por:
1. Testar até o último inteiro menor ou igual à raíz quadrada do número em questão (Acredito ser impossível existir um número divisível por algum número maior que este limite) 2. Ir armazenando os números primos encontrados e testar somente dentro desta lista (Lembrei da fatoração, geralmente utilizamos números primos quando fazemos isto)
Acredito que devam existir mais maneiras de otimizar, teria que debruçar sobre o problema com calma
[]s Leonard de Assis assis <dot> leonard <at> gmail <dot> com
Em 22/08/2012 11:35, Francisco Eduardo de Castro escreveu:
Bom dia,
Alguém sabe como fazer um programa no R que encontre os 10 mil primeiros números primos, cuja velocidade de execução da tarefa seja de até 15 segundos?
att,
Francisco __._,_.___
-- "There are three kinds of lies: lies, damn lies, and statistics." Benjamin Disraeli

Segue o código Em Wed, 22 Aug 2012 15:37:20 -0300 Leonard de Assis <assis.leonard@gmail.com> escreveu:
Olá,
não sei um algoritmo rápido, mas o caminho se passa por:
1. Testar até o último inteiro menor ou igual à raíz quadrada do número em questão (Acredito ser impossível existir um número divisível por algum número maior que este limite) 2. Ir armazenando os números primos encontrados e testar somente dentro desta lista (Lembrei da fatoração, geralmente utilizamos números primos quando fazemos isto)
Acredito que devam existir mais maneiras de otimizar, teria que debruçar sobre o problema com calma
[]s Leonard de Assis assis <dot> leonard <at> gmail <dot> com
Em 22/08/2012 11:35, Francisco Eduardo de Castro escreveu:
Bom dia,
Alguém sabe como fazer um programa no R que encontre os 10 mil primeiros números primos, cuja velocidade de execução da tarefa seja de até 15 segundos?
att,
Francisco __._,_.___ <mailto:dumat84@yahoo.com.br?subject=Res%3A%20N%DAMEROS%20PRIMOS%20NO%20R> | através de email <mailto:STAT-MATH@yahoogrupos.com.br?subject=Res%3A%20N%DAMEROS%20PRIMOS%20NO%20R> | Responder através da web <http://br.groups.yahoo.com/group/STAT-MATH/post;_ylc=X3oDMTJxaTNpbmhvBF9TAzk3NDkwNDM3BGdycElkAzMyNTIxNDUEZ3Jwc3BJZAMyMTM3MTExNjA1BG1zZ0lkAzI1NzU2BHNlYwNmdHIEc2xrA3JwbHkEc3RpbWUDMTM0NTY1NzQwOA--?act=reply&messageNum=25756> | Adicionar um novo tópico <http://br.groups.yahoo.com/group/STAT-MATH/post;_ylc=X3oDMTJlMmFqbGU5BF9TAzk3NDkwNDM3BGdycElkAzMyNTIxNDUEZ3Jwc3BJZAMyMTM3MTExNjA1BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTM0NTY1NzQwOA-->
Mensagens neste tópico <http://br.groups.yahoo.com/group/STAT-MATH/message/25756;_ylc=X3oDMTM2YTRuZ201BF9TAzk3NDkwNDM3BGdycElkAzMyNTIxNDUEZ3Jwc3BJZAMyMTM3MTExNjA1BG1zZ0lkAzI1NzU2BHNlYwNmdHIEc2xrA3Z0cGMEc3RpbWUDMTM0NTY1NzQwOAR0cGNJZAMyNTc1Ng--> (1) Atividade nos últimos dias:
* Novos usuários <http://br.groups.yahoo.com/group/STAT-MATH/members;_ylc=X3oDMTJmbGdkY2poBF9TAzk3NDkwNDM3BGdycElkAzMyNTIxNDUEZ3Jwc3BJZAMyMTM3MTExNjA1BHNlYwN2dGwEc2xrA3ZtYnJzBHN0aW1lAzEzNDU2NTc0MDg-?o=6> 17
Quem procura, acha. Encontre a pessoa ideal online <http://global.ard.yahoo.com/SIG=15m70od66/M=758712.15012700.14784528.12960164/D=brclubs/S=2137111605:MKP1/Y=BR/EXP=1345664610/L=e2cd2ec6-ec80-11e1-a5eb-cbc88b3d1dd0/B=NnBCKdBDRok-/J=1345657410370373/K=FtikA1QIa6cbozzTN6bF4Q/A=6630596/R=0/id=mkp1/SIG=135cat74t/*http://tracking.parperfeito.com.br/ppbanner/bannerTracker?originId=1&identifierId=756977&actionId=1>
------------------------------------------------------------------------ Ainda dá tempo de encontrar companhia para passar o Dia dos Namorados! <http://global.ard.yahoo.com/SIG=15mi8vfse/M=830568.15128937.14797398.12960164/D=brclubs/S=2137111605:MKP1/Y=BR/EXP=1345664610/L=e2cd2ec6-ec80-11e1-a5eb-cbc88b3d1dd0/B=N3BCKdBDRok-/J=1345657410370373/K=FtikA1QIa6cbozzTN6bF4Q/A=6630595/R=0/id=mkp1/SIG=135ccghg9/*http://tracking.parperfeito.com.br/ppbanner/bannerTracker?originId=1&identifierId=756976&actionId=1>
------------------------------------------------------------------------ Ofertas HP <http://global.ard.yahoo.com/SIG=15mjg3tka/M=833022.15256589.14900301.12796144/D=brclubs/S=2137111605:MKP1/Y=BR/EXP=1345664610/L=e2cd2ec6-ec80-11e1-a5eb-cbc88b3d1dd0/B=NXBCKdBDRok-/J=1345657410370373/K=FtikA1QIa6cbozzTN6bF4Q/A=6722901/R=0/id=mkp1/SIG=12cnorq5l/*http://ia.nspmotion.com/click/?cap=87856&c=13059&r=1345657410370373&t=true>
Trocar para: Só Texto <mailto:STAT-MATH-traditional@yahoogrupos.com.br?subject=Mudar%20Formato%20de%20Envio:%20Tradicional>, Resenha Diária <mailto:STAT-MATH-digest@yahoogrupos.com.br?subject=Envio%20de%20email:%20Resenha> . Sair do grupo <mailto:STAT-MATH-unsubscribe@yahoogrupos.com.br?subject=Sair%20do%20grupo> . Termos de uso <http://br.yahoo.com/info/utos.html> .
__,_._,___
-- "There are three kinds of lies: lies, damn lies, and statistics." Benjamin Disraeli
participantes (3)
-
Leonard de Assis
-
Listeiro 037
-
Mauro Sznelwar