Primus-Orderus Primes


15

그들은 누구입니까?

Primus-Orderus Primes (POP)는 일련의 소수로 순서 를 포함하는 소수입니다.
따라서 nth소수는 POP가 되려면 n내가 설명 할 특정 방식으로 모든 자릿수를 포함해야합니다 .

예

더 명확하게 이해합시다 :의 모든 n숫자는 POP의 숫자와 동일한 순서로 나타나야합니다.n

6469th프라임은 64679그것의 모든 숫자가 포함되어 있기 때문에 POP 인 6469올바른 순서입니다. 소수
1407647이기 때문에 POP107647th

14968819 는 POP (968819 번째 프라임)이므로이 문제는 OEIS 가 아닙니다 (A114924).

1327은 소수 이므로 POP 가 아닙니다217th (숫자가 올바른 순서가 아님).

도전

당신은 맞았다!
정수가 주어지면 POP를 n출력하십시오.nth

테스트 사례

입력-> 출력

1->17
3->14723    
5->57089
10->64553 
29->284833  
34->14968819

이것은 이므로 바이트 단위의 최단 답변이 이깁니다!

이 모든 것은 1- 색인이어야합니다


0 인덱스, 1 인덱스 또는 딜러 선택?
— Shaggy

@Shaggy 나는 이것이 테스트 사례 (순서 종류의 문제)와 호환되도록 1 인덱스라고 생각합니다.
— Mr. Xcoder

@ Mr.Xcoder 그것은 첫 번째 POP, 일곱 번째 프라임입니다

@MrXcoder : 예, 미안합니다. 내가 묻는 것은 0 인덱싱이 허용됩니까? 분명히 테스트 사례에서 1- 인덱싱 이 허용됩니다. 그런데 테스트 케이스 만 있고 챌린지 사양에 명시 적으로 언급되지 않은 경우 챌린지에서 사용할 수있는 인덱싱에 대한 합의가 있습니까?
— Shaggy

1
고마워 빌 대부분의 경우 최근의 과제는 매우 좋았지 만 각각의 문제는 의견에서 해결해야 할 사소한 문제 또는 2가 있었으므로 과제를 샌드 박싱하기 시작하는 것이 좋습니다. 우리가 그 문제를 잡을 수 있습니다.
— Shaggy

답변:


3

수학, 104 바이트

매우 효율적인

(t=i=1;While[t<#+1,If[!FreeQ[Subsets[(r=IntegerDigits)@Prime@i,{Length@r@i}],r@i],t++];i++];Prime[i-1])&


1 분 안에 n = 34를 찾습니다


2

껍질 , 11 바이트

!fS¤o€Ṗdṗİp

온라인으로 사용해보십시오!

그렇게 빠르지는 않지만 TIO에서 약 30 초 안에 f (5)를 계산합니다.

설명

!fS¤o€Ṗdṗİp
 f       İp    Filter the list of prime numbers and keep only those for which:
  S¤o€Ṗdṗ       The "d"igits of its index in the "ṗ"rime numbers are an "€"lement of the 
                  "Ṗ"owerset of its "d"igits
!              Return the element at the desired index of this filtered list

2

파이썬 2 + gmpy2 , 188 162 바이트

매우 효율적이며, TIO 에서 22 초 안에 n = 34를 찾습니다 !

아마 약간 골프를 쳤다

from gmpy2 import*
def F(a,b):
 i=k=0
 while b[i:]and a[k:]:k+=a[k]==b[i];i+=1
 return"0">a[k:]
x=input()
u=z=1
while x:z=next_prime(z);x-=F(`u`,`z`);u+=1
print z

온라인으로 사용해보십시오!


@Dopapp, 바이트를 추가하지 않습니까? __import__("gmpy2").보다 긴from gmpy2 import*\n
— Halvard Hummel

아 맞다. 왜 처음으로 다른지 모르겠다. 아마 인용 부호 나 다른 것을 잊었을 것입니다
— Daniel


당사 사이트를 사용함과 동시에 당사의 쿠키 정책과 개인정보 보호정책을 읽고 이해하였음을 인정하는 것으로 간주합니다.
Licensed under cc by-sa 3.0 with attribution required.