प्राइमस-ऑर्डरस प्राइम्स

Question

वे कौन हैं?

प्राइमस-ऑर्डरस प्राइम्स (पीओपी) ऐसे प्राइम्स हैं जिनमें प्राइम्स के क्रम में उनका क्रम होता है।
तो nthप्राइम, पीओपी होने के लिए, nएक निश्चित तरीके से सभी अंकों को समाहित करना चाहिए जो मैं समझाता हूं।

उदाहरण

आइए चीजों को स्पष्ट करें: nपीओपी के सभी अंकों को उसी क्रम में दिखाई देना चाहिए जिस क्रम में वे दिखाई देते हैंn

6469thप्रधानमंत्री है 64679जो पॉप है, क्योंकि यह के सभी अंक हैं 6469सही क्रम में।
1407647POP है क्योंकि यह 107647thअभाज्य संख्या है

14968819 है पॉप (968819 प्रधानमंत्री) इस चुनौती तो है नहीं (A114924) OEIS

1327 POP नहीं है क्योंकि यह 217thप्रमुख है (अंक सही क्रम में नहीं हैं)

चुनौती

आपने सही अनुमान लगाया!
पूर्णांक को देखते हुए n, nthपीओपी का उत्पादन करें

परीक्षण के मामलों

इनपुट-> आउटपुट

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

यह कोड-गोल्फ है इसलिए बाइट्स जीत में सबसे छोटा जवाब है!

इन सभी को 1-अनुक्रमित किया जाना चाहिए

Comments

0-अनुक्रमित, 1-अनुक्रमित या डीलर की पसंद?

— झबरा

@ मुझे लगता है कि यह 1-अनुक्रमित है जैसे कि यह परीक्षण मामलों (मामलों के क्रम प्रकार) के साथ संगत है।

— श्री एक्सकोडर

@ Mr.Xcoder यह पहली पीओपी है, 7 प्राइम

@MrXcoder: हाँ, माफ करना, मैं शायद खराब प्रदर्शन किया; क्या मैं पूछना चाहता था कि 0-अनुक्रमण की अनुमति है? जाहिर है, परीक्षण मामलों से, 1-अनुक्रमण की अनुमति है। क्या हमारे पास एक आम सहमति है, जिस पर हम एक चुनौती का उपयोग कर सकते हैं, अगर हम सभी को परीक्षण के मामलों में जाना है और चुनौती के चश्मे में कोई स्पष्ट उल्लेख नहीं है?

— शैगी

धन्यवाद, बिल। हालांकि, अधिकांश भाग के लिए, आपकी हाल की चुनौतियां बहुत अच्छी रही हैं, उनमें से प्रत्येक में एक छोटी सी समस्या या 2 है जिसे टिप्पणियों में स्पष्ट करना पड़ा है, यही कारण है कि मैं आपको अपनी चुनौतियों को सैंडबॉक्सिंग शुरू करने का सुझाव दूंगा, हमें उन मुद्दों को पकड़ने की अनुमति दें।

— झबरा

Answer 1

गणितज्ञ, 104 बाइट्स

अत्यंत कुशल

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

एक मिनट के भीतर n = 34 पाता है

Answer 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

Answer 3

पायथन 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

इसे ऑनलाइन आज़माएं!

Comments

@ डोप्प्प, क्या बाइट नहीं जोड़ेंगे? __import__("gmpy2").से लंबा हैfrom gmpy2 import*\n

— हलव्डर विल्म २

ओह, मुझे नहीं पता कि पहली बार अलग क्यों आया। मैं शायद उद्धरण चिह्नों या कुछ और भूल गया

— डैनियल

Answer 4

05AB1E , 11 बाइट्स

µN<Ø©æNå½}®

इसे ऑनलाइन आज़माएं!

अत्यंत अकुशल।

Answer 5

जेली , 12 बाइट्स

ÆNDŒPḌċµ#ṪÆN

इसे ऑनलाइन आज़माएं!

बेहद अक्षम लेकिन काम करता है।