24

ধনাত্মক পূর্ণসংখ্যার ডিজিটাল রুট (পুনরাবৃত্ত ডিজিটাল যোগফল) হ'ল একক অঙ্কের একটি পুনরাবৃত্ত প্রক্রিয়া দ্বারা প্রাপ্ত (একক অঙ্ক) মান, প্রতিটি পুনরাবৃত্তির উপর পূর্ববর্তী পুনরাবৃত্তির থেকে ফলাফলকে অঙ্কের অঙ্কের গুণন করতে ব্যবহৃত হয়। একক-অঙ্কের সংখ্যা না পাওয়া পর্যন্ত প্রক্রিয়াটি চলতে থাকে।

উদাহরণস্বরূপ, ডিজিটাল রুট 65536 হয় 7 , কারণ 6 + 5 + 5 + 3 + 6 = 25 এবং 2 +5 = 7 ।

সমস্ত ডিজিটাল শিকাগুলি বাছাই করা কোনও তাত্পর্যপূর্ণ নয়, যেহেতু এটি কেবল অসীম বহু 1 টি দিয়ে শুরু হবে ।

পরিবর্তে, আমরা তাদের ডিজিটাল শিকড়গুলির সাথে সমস্ত একক অঙ্কের পূর্ণসংখ্যার তালিকা তৈরি করব, তারপরে সমস্ত ডিজিটাল শিকড় সহ সমস্ত দ্বিগুণ সংখ্যা, তারপরে ট্রিপল, চতুর্থাংশ এবং আরও অনেক কিছু।

এখন, এই তালিকাগুলির প্রত্যেকটির জন্য, আমরা এটি বাছাই করব যাতে 1 এর ডিজিটাল শিকড় সহ সমস্ত পূর্ণসংখ্যার উপস্থিতি দেখা যায়, তারপরে 2 এবং এর জাতীয় ডিজিটাল শিকড় সহ সমস্ত পূর্ণসংখ্যা উপস্থিত হয়। বাছাই স্থিতিশীল থাকবে, যাতে নির্দিষ্ট ডিজিটাল শিকড় সহ পূর্ণসংখ্যার তালিকা বাছাইয়ের পরে আরোহণের ক্রমে হয়।

অবশেষে আমরা এই তালিকাগুলি একত্রে অনুসরণ করব। এই ক্রমটি সমস্ত একক সংখ্যার সাথে শুরু হবে, তারপরে সমস্ত দ্বিগুণ সংখ্যা (তাদের ডিজিটাল মূল অনুসারে বাছাই করা), তারপরে সমস্ত ট্রিপল অঙ্ক সংখ্যা এবং এই জাতীয়।

চ্যালেঞ্জ:

ইনপুট হিসাবে ধনাত্মক পূর্ণসংখ্যা এন নিন এবং উপরে বর্ণিত ক্রমের n 'তম সংখ্যাটি আউটপুট দিন । আপনি যদি তালিকাটি 1- ইনডেক্সের 0- সূচকযুক্ত চয়ন করতে পারেন ।

ক্রমটি এরকম হয়:

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 19, 28, 37, 46, 55, 64, 73, 82, 91, 11, 20, 29 ... 
72, 81, 90, 99, 100, 109, 118, ... 
981, 990, 999, 1000, 1009, 1018, 1027, ...

পরীক্ষার কেস:

পরীক্ষার কেসগুলি 1-সূচকযুক্ত।

   n   f(n)  
   9      9
  10     10
  11     19
  40     13
  41     22
  42     31
  43     40
  44     49
  45     58
 600    105
 601    114
 602    123
 603    132
 604    141
 605    150
4050   1453
4051   1462
4052   1471
4053   1480
4054   1489
4055   1498

অনুলিপি করা সহজ:

n =    9, 10, 11, 40, 41, 42, 43, 44, 45, 600, 601, 602, 603, 604, 605, 4050, 4051, 4052, 4053, 4054, 4055, 
f(n) = 9, 10, 19, 13, 22, 31, 40, 49, 58, 105, 114, 123, 132, 141, 150, 1453, 1462, 1471, 1480, 1489, 1498

ব্যাখ্যা:

আপনি সমস্ত এন প্রথম উপাদান আউটপুট নাও করতে পারেন । আপনি শুধুমাত্র আউটপুট হইবে এন 'ম।
কোডটি অবশ্যই তাত্ত্বিকভাবে 10 ^ 9 অবধি সমস্ত পূর্ণসংখ্যার জন্য কাজ করবে, তবে এটি 999 এর চেয়ে বড় ইনপুটগুলির জন্য টিআইওর (বা সময়ের সীমাবদ্ধতার সাথে অন্যান্য দোভাষী) সময় বের করা ঠিক আছে ।
ব্যাখ্যা উত্সাহিত হয়।

এটি কোড-গল্ফ , তাই প্রতিটি ভাষার সংক্ষিপ্ততম কোডটি জয়ী হয়! আপনি যে ভাষায় গল্ফ করতে চান সে বিষয়ে অন্যান্য সমাধানগুলি দ্বারা হতাশ হবেন না, এমনকি আপনি যেগুলি পরিচালনা করতে পারেন তার চেয়ে কম সংক্ষিপ্ত হলেও!

— স্টিও গ্রিফিন
সূত্র

2

মজাদার নোট: এই হল না OEIS এখনো

— apnorton

16

পাইথন 2 , _{78 60 52 46 46} 45 বাইট

জিবি -6 বাইট ধন্যবাদ ।
-1 থেকে বাইট ধন্যবাদ জ্যাকব ।

n=input()
b=10**~-len(`n`)
print~-b+n/b+n%b*9

এটি অনলাইন চেষ্টা করুন!

অবশেষে 1-ইনডেক্সযুক্ত একটি বন্ধ ফর্মে পৌঁছেছে।

পাইথন 2 , 78 বাইট

0-ইন্ডেক্স।

d=10;k=1
exec'\nk+=9\nif k>d+7:k=d;d*=10\nif k>=d:k-=d/10*9-1'*input()
print k

এটি অনলাইন চেষ্টা করুন!

— ovs
সূত্র

2

আমি এমন একটি সমাধান দেখার আশা করছিলাম যা পুরো ক্রমটি তৈরি করে নি। ভাল করেছেন :-)

— স্টিভি গ্রিফিন

আপনি কীভাবে বন্ধ ফর্ম সমাধান পেয়েছেন? (সম্পাদনা: দেখে মনে হচ্ছে উইকিপিডিয়ায় কোনও ব্যাখ্যা রয়েছে )

— সেভকো

@ সেভকো 78-বাইটারটি আমার আসল সমাধান ছিল ( এখানে কিছুটা অবলম্বিত রূপ )। এটি ইতিমধ্যে কোনও কিউব শিকড় গণনা ছাড়াই কাজ করে, বরং আমি ক্রমটিতে লক্ষ্য করা নিয়মের ভিত্তিতে সংখ্যা অনুসারে ক্রম সংখ্যা তৈরি করে। এই পুনরাবৃত্ত গণনার উপর ভিত্তি করে প্রতিটি প্রতিটি অভিব্যক্তি কতবার কার্যকর হয় তা গণনা করতে পারে।

— ovs

সঙ্গে @sevko WolframAlpha সাহায্যে আমি একটি বদ্ধ ফর্ম গঠন করা করতে সক্ষম হন। প্রথমে বন্ধ ফর্মটি ব্যবহার করে প্রোগ্রামটি অনেক দীর্ঘ ছিল (~ 95 বাইট) তবে কিছু গল্ফিং এবং ওল্ফ্রামআল্ফার সাথে এটি বর্তমান আকারে পৌঁছেছে ।

— ovs

4

পাইথন 3 , 80 বাইট

f=lambda i,k=1:k>i and sorted(range(k//10,k),key=lambda n:n%-9)[i-k]or f(i,k*10)

এটি অনলাইন চেষ্টা করুন!

1-ইন্ডেক্স। পাইথন 3 এ এটিই আমি সেরা পরিচালনা করতে পারি (ভাল, নীচে আমার পাইথন 2 সমাধানের একটি বন্দর যা 78-বাইটার ব্যতীত ; আমি মনে করি এটি যদিও খুব শীতল)। পাইথন 2 সম্পূর্ণ প্রোগ্রামগুলি এই বিশেষ চ্যালেঞ্জের জন্য সুবিধাজনক, কারণ পাইথন 3 (+5 বাইট) এ input()রূপান্তর প্রয়োজন int, execএটি একটি ফাংশন, বিবৃতি (+2 বাইট) না /হয়ে ডিফল্ট হিসাবে পূর্ণসংখ্যা বিভাগ সম্পাদন করে যদি এর যুক্তিগুলি পূর্ণসংখ্যা হয় পাই 2 (+1 বাইট), সুতরাং এটি অবশ্যই ovs এর উত্তর পোর্টিংয়ের চেয়ে কম ।

কিভাবে এটা কাজ করে

সেটআপ

f=lambda i,k=1:k>i and ... or f(i,k*10)

এই সংজ্ঞায়িত একটি recursive ফাংশন চ যে এক পূর্ণসংখ্যা আর্গুমেন্ট গ্রহণ করা আমি এবং অন্য এক, ট , যা ডিফল্ট 1 । যদিও ট ≤ আমি , ফাংশন চ রিটার্ন চ (ঝ, 10k) , গুন ট দ্বারা 10 প্রতিটি সময় পর্যন্ত এটি তার চেয়ে অনেক বেশী হয়ে আমি ।

লক্ষ্য পরিসীমা এবং সঠিক সূচক

...range(k//10,k)...[i-k]

অপারেশনের এই সেটটির পরে, আমরা i , প্রাথমিক ইনপুট এবং ভেরিয়েবল কে দিয়ে রেখেছি যা i এর চেয়ে 10 এর ক্ষুদ্রতম শক্তিটি উপস্থাপন করে । এইভাবে, আমরা (পূর্ণসংখ্যা) পরিসীমা [মেঝে (কে / 10), কে) তৈরি করতে সক্ষম হচ্ছি , যা মূলত সমস্ত পূর্ণসংখ্যার অন্তর্ভুক্ত যা:

i এর চেয়ে কম বা 10 এর সর্বোচ্চ পাওয়ারের চেয়ে বড় বা সমান
k এর চেয়ে কম , i এর চেয়ে 10 এর ক্ষুদ্রতম শক্তি

যেহেতু আমরা x = তল (কে / 10) এর চেয়ে ছোট সংখ্যাকে অগ্রাহ্য করি তাই অনুপস্থিত সংখ্যার জন্য আমরা অ্যাকাউন্টিং করতে হবে তাই আমাদের সূচিটি স্থানান্তর করতে হবে। সুস্পষ্ট পথ তাদের গণনা, বিয়োগ হয় এক্স থেকে আমি যাতে আমরা তালিকায় ইনডেক্স (বাছাই পর, যা নিচে আলোচনা করা হয়েছে), তাই হচ্ছে IX । যাইহোক, তালিকা রয়েছে 9K / 10 , আইটেম এবং সূচিতে তালিকার ইন্ডেক্স -y কিছু ইতিবাচক জন্য Y উৎপাদ Y ^তম পাইথন মধ্যে শেষ থেকে উপাদান, এই কেবল সঙ্গে ইন্ডেক্স সমতূল্য Ik , অত 4 বাইট সংরক্ষণ।

প্রতিটি খণ্ডকে ডিজিটাল মূল অনুসারে বাছাই করা হচ্ছে

sorted(...,key=lambda n:n%-9)

ডিজিটাল রুট ফাংশনের সূত্রটি 1 + ((এন-1) মোড 9) ( এই উইকিপিডিয়া নিবন্ধের একত্রিত সূত্র বিভাগটি দেখুন )। যেহেতু 1 এইভাবে তাদের প্রত্যেকের সাথে যুক্ত করা হবে, বাছাই করার সময় এটি অতিমাত্রায় হয়, সুতরাং আমরা (এন-1) 9 মড রেখে আসছি । আরএইচএসে নেতিবাচক সংখ্যা দেওয়ার সময় পাইথনের অপারেটর যেভাবে কাজ করে তা খুব সুবিধাজনক কারণ আমরা অ্যান্থার বাইট সংরক্ষণের পরিবর্তে আমরা এন পাইমড -9 ব্যবহার করতে পারি।%

পাইথন 2 , 72 বাইট

চ্যাস ব্রাউন এর জমা দিয়ে অনুপ্রাণিত ।

lambda i:sorted(range(1,10**len(`i`)),key=lambda n:(len(`n`),n%-9))[i-1]

এটি অনলাইন চেষ্টা করুন!

— মিঃ এক্সকোডার
সূত্র

4

পাইথন 2 , 73 71 70 বাইট

lambda n:sorted(range(10**len(`n`)),key=lambda i:(len(`~i`),i%9))[n]+1

এটি অনলাইন চেষ্টা করুন!

মিঃ এক্সকোডারকে 2 বাইট থেক্স ; এবং 1 বাইট থেক্স থেকে এইচ.পি.উইজ ।

এটি 0-সূচকযুক্ত।

— চ্যাস ব্রাউন
সূত্র

ঠিক আছে, i%9পরিবর্তে যথেষ্ট হওয়া উচিত i%9+1... এইভাবে আপনি আমার 72 বাইটারকে মারলেন: ডিডি:

— মিঃ এক্সকোডার

@ মিঃ এক্সকোডার: হা! আপনি ঠিক বলেছেন ...

— চ্যাস ব্রাউন

len(`~i`)কাজ করা উচিত

— এইচপিউইজ

4

জেলি , 15 14 10 9 বাইট

D,Ḣ$‘Ḍḅ9’

এটি অনলাইন চেষ্টা করুন!

কিভাবে?

ওজগুলি তাদের পাইথন উত্তরে তৈরি ক্লোজড-ফর্ম সমাধানের গল্ফযুক্ত সংস্করণ ব্যবহার করে ...

Ovs দ্বারা প্রকাশিত সূত্রটি হ'ল: 9 * (এন% বি) + (এন / বি) + বি - 1 যেখানে বি = 10 ^{তল (লগ (এন, 10))}

এখন যদি গ দশমিক সংখ্যা গণনা হয় এন তারপর খ-1 হল C-1 দশমিক মধ্যে নবম সংখ্যা।
এটি সি -1 এর মূল্যের নয় গুণ হিসাবে একই দশমিক (উদাঃ 111*9=999) ।

ততক্ষণে এন / বি হল এন এবং এন% বি এর শীর্ষস্থানীয় সংখ্যা করা হয় একটি দশমিক সংখ্যা হিসাবে ডিজিটের বাকি।

খ * x + y এর মতো সূত্রটি [x,y]বেস বি থেকে অর্থ রূপান্তর হিসাবে প্রয়োগ করা যেতে পারে
(যেমন বি ^ 1 * x + বি ^ 0 * y = বি * x + y )

যেমন আমরা একটি সংখ্যা নিতে পারি, উদাহরণস্বরূপ , এন (উদাহরণস্বরূপ 7045), এটিকে নেতৃস্থানীয় এবং পেছনের অঙ্কগুলিতে বিভক্ত করুন, শীর্ষস্থানীয় অঙ্কটি শেষে ( [[0,4,5],7]) রেখে, যোগ করার জন্য প্রথম আইটেমের সমস্ত সংখ্যায় একটি যুক্ত করুন খ -১ ( [[1,5,6],7]) দশমিক তালিকাগুলি থেকে পূর্ণসংখ্যার ( [156,7]) এ রূপান্তর করুন এবং এটি বেস নয় থেকে রূপান্তর করুন (1411 ) ।

নীচের বাস্তবায়নে আমরা বি -1 ( [[0,4,5],8]) এর জন্য খাদ্য সরবরাহের সময় উভয় আইটেমের সমস্ত সংখ্যার সাথে একটি যুক্ত করি , দশমিক তালিকা থেকে পূর্ণসংখ্যা ( [156,8]) তে রূপান্তর করি, বেস নাইন ( 1412) থেকে রূপান্তর করুন এবং তারপরে এই প্রক্রিয়াটি যুক্ত করা একটিকে বিয়োগ করুন ( 1411)।

D,Ḣ$‘Ḍḅ9’ - Link: positive integer, n    e.g. 4091
D         - to base ten                       [4, 0, 9, 1]
   $      - last two links as a monad:
  Ḣ       -   head (modifies the list too)    4
 ,        -   pair (the modified list) with   [[0, 9, 1], 4]
    ‘     - increment (vectorises)            [[1, 10, 2], 5]
     Ḍ    - from base ten (vectorises)        [202, 5] (since 1*10^2+10*10^1+2*10^0 = 100+100+2 = 202)  
      ḅ9  - convert from base 9               1823 (since 202*9^1 + 5*9^0 = 202*9 + 6*9 = 1818 + 5 = 1823)
        ’ - decrement                         1822

পূর্ববর্তী, 14 বাইটার:

æċ⁵DL,’%9ƊƲÞị@

এটি অনলাইন চেষ্টা করুন!

এই একটি এই প্রাকৃতিক সংখ্যার বাছাই করে ইনপুট উপরে পরবর্তী 10 পাওয়ার পর্যন্ত তালিকা তৈরি করে [digitalRoot, digitCount]তারপরে ইনপুটড ইনডেক্সে মানটি সন্ধান করে।

— জোনাথন অ্যালান
সূত্র

3

হাস্কেল , 94 88 বাইট

([n|x<-[0..],i<-[1..9],n<-[10^x..10^(x+1)-1],until(<10)(sum.map(read.pure).show)n==i]!!)

এটি অনলাইন চেষ্টা করুন!0-ইন্ডেক্স।

ব্যাখ্যা:

তালিকা অনুধাবন অসীম তালিকা হিসাবে ক্রম উত্পন্ন করে যার সাথে আমরা সূচক করি !!:

x বর্তমান সংখ্যার তুলনায় একটি কম এবং অসীম তালিকা থেকে আঁকা [0,1,2,3, ...]
iথেকে সীমায় iterates 1করতে9 এবং ডিজিটাল শিকড় দ্বারা বাছাই জন্য ব্যবহার করা হয়
nx+1অঙ্ক সহ সমস্ত সংখ্যার উপরে পুনরাবৃত্তি হয়
until(<10)(sum.map(read.pure).show)ডিজিটাল রুট গণনা করুন ( ব্যাখ্যা জন্য এখানে দেখুন )
nএর ডিজিটাল রুটের সমান হলে তালিকায় যুক্ত করা হবে i।

— Laikoni
সূত্র

2

রেটিনা , 65 বাইট

.
9
.+
*
L$`
$`
O$`_(_{9})*(_*)
$2
_+
$.&
N$`
$.&
"$+L`^|\d+"^~G`

এটি অনলাইন চেষ্টা করুন! 1-ইন্ডেক্স। ব্যাখ্যা:

.
9
.+
*
L$`
$`

_এর পরের পাওয়ার 10 (একচেটিয়া) অবধি 0 থেকে লাইনগুলির একটি তালিকা তৈরি করুন ।

O$`_(_{9})*(_*)
$2

তাদের সকলকে ডিজিটাল রুটের ক্রম অনুসারে বাছাই করুন।

_+
$.&

অ্যানারি থেকে দশমিক রূপান্তর করুন।

N$`
$.&

দৈর্ঘ্যের ক্রমে তাদের বাছাই করুন।

"$+L`^|\d+"^~G`

nতম উপাদানটি বের করুন ।

— নিল
সূত্র

2

পাইথ , 36 31 25 24 23 22 বাইট

1-ইন্ডেক্স।

@o%tN9rFK^LThBlt`Q-QhK

পরীক্ষা স্যুট!

এটি কীভাবে কাজ করে (পুরানো)

@smo%tN9dcU^TKhs.lQT^LTSK – Full program. Q = input.
             Khs.lQT      – Take floor(log10(Q))+1 and store it in K.
          U^T             – Generate [0 ... T^K).
         c                – Cut at locations...
                    ^LTSK – Of the powers of 10 less than K.
  m     d                 – Map over those.
   o  N                   – Sort them by...
    %t 9                  – Themselves decremented, modulo 9.
@s                        – Flatten the result and retrieve the Q'th entry.

— মিঃ এক্সকোডার
সূত্র

2

05 এ বি 1 ই , 19 11 বাইট

আমার পাইথন উত্তর বন্দর ।

-6 বাইট (!) ধন্যবাদ কেভিন Cruijssen ।

g<°©‰`9*®O<

এটি অনলাইন চেষ্টা করুন!

Code           Explanation            Stack
               implicit input         [n]
g              length                 [len(n)]
 <             decrement              [len(n)-1]
  °            10 ** a                [10**(len(n) - 1)]
   ©           store value            [10**(len(n) - 1)]
    ‰          divmod                 [[n // 10**(len(n) - 1), n % 10**(len(n) - 1)]]
     `         push items to stack    [n // 10**(len(n) - 1), n % 10**(len(n) - 1)]
      9*       multiply by 9          [n // 10**(len(n) - 1), n % 10**(len(n) - 1) * 9]
        ®      retrieve value         [n // 10**(len(n) - 1), n % 10**(len(n) - 1) * 9, 10**(len(n) - 1)]
         O     sum the stack          [n // 10**(len(n) - 1) + n % 10**(len(n) - 1) * 9 + 10**(len(n) - 1)]
          <    decrement              [n // 10**(len(n) - 1) + n % 10**(len(n) - 1) * 9 + 10**(len(n) - 1) - 1]
               implicit output

— ovs
সূত্র

আপনি আমাকে এটি মারলেন, এমন একটি উত্তরে কাজ করছেন যা আপনার পাইথন উত্তরের একটি বন্দর ছিল। ;) 13 বাইট:g<°©÷¹®%9*®O< । এখানে আমি ব্যাখ্যাটির জন্য পোস্ট করতে যাচ্ছি ।

— কেভিন ক্রুইজসেন

1

@ কেভিন ক্রুইজসেন অনেক ধন্যবাদ। নিবন্ধটি বেশ কার্যকর বলে মনে হচ্ছে। আমি এটি ডিভোড ব্যবহার করে আরও দুটি বাইট নামাতে সক্ষম হয়েছি।

— ovs

1

পাইথ , 23 বাইট

@o%tN9rF_mJ^TsdtBl`Q-QJ

এখানে চেষ্টা করুন।

-3 মিঃ এক্সকোডারকে ধন্যবাদ

1-ইন্ডেক্স।

— এরিক দ্য আউটগল্ফার
সূত্র

1

পার্ল 6 , 68 58 বাইট

{({|(10**$++..^10**++$).sort({({.comb.sum}…*==*).tail})}…*)[$_]}

এটি 0-ভিত্তিক পরীক্ষা করুন

{sort({.chars,({.comb.sum}…*==*).tail},^10**.chars)[$_]}

এটি 1-ভিত্তিক পরীক্ষা করুন

সম্প্রসারিত:

{  # bare block lambda with implicit parameter $_

  sort(
    {
      .chars,         # sort by the length first

      (  # generate sequence to find digital sum

        { .comb.sum } # one round of digital sum
        … * == *      # stop when the digital sum matches itself (1..9)

      ).tail          # get the last value
    },

    ^                 # Range up to (and excluding)
      10 ** .chars    # the next power of 10

  )[ $_ ] # index into the sequence
}

— ব্র্যাড গিলবার্ট বি 2 গিলস
সূত্র

1

রুবি , 43 38 বাইট

->x{9*(x%b=10**~-x.to_s.size)+x/b+b-1}

এটি অনলাইন চেষ্টা করুন!

মূলত ovs দ্বারা দুর্দান্ত পাইথন উত্তরের একটি বন্দর, তারপরে আরও কিছু সরলীকৃত।

— গিগাবাইট
সূত্র

1

জাভা 8, 68 বাইট

n->{int b=(int)Math.pow(10,(n+"").length()-1);return~-b+n/b+n%b*9;}

@Ovs এর পাইথন 2 উত্তরটির বোরিং বন্দর , সুতরাং তাকে উর্ধ্বমুখী করা নিশ্চিত করুন!
-1 বাইট ধন্যবাদ @ জ্যাকবকে

এটি অনলাইনে চেষ্টা করুন।

— কেভিন ক্রুইজসেন
সূত্র

1

K4 , 38 বাইট

সমাধান:

-1+9/:10/:'(0;c-1)_1_(1+c:#x)#x:1+10\:

উদাহরণ:

q)k)-1+9/:10/:'(0;c-1)_1_(1+c:#x)#x:1+10\:40
13
q)k)-1+9/:10/:'(0;c-1)_1_(1+c:#x)#x:1+10\:601
114
q)k)-1+9/:10/:'(0;c-1)_1_(1+c:#x)#x:1+10\:4051
1462

ব্যাখ্যা:

জোনাথন অ্যালান এর সমাধানের বন্দর যখন আমি মেমোরিটি 1 থেকে 1e9 পর্যন্ত ডিজিটাল শিকড় তৈরির বাইরে চলে যাই।

-1+9/:10/:'(0;c-1)_1_(1+c:#x)#x:1+10\: / the solution
                                  10\: / convert to base 10
                                1+     / add 1
                              x:       / save as x
                             #         / take from x
                     (      )          / do together
                          #x           / count x
                        c:             / save as c
                      1+               / add 1
                   1_                  / drop the first
                  _                    / cut at these indices
           ( ;   )                     / 2-item list
              c-1                      / length - 1
            0                          / .. zero
      10/:'                            / convert each from base 10
   9/:                                 / convert from base 9
-1+                                    / subtract 1

বোনাস:

Ovs এর সমাধানটির অনুবাদ সহজ তবে দীর্ঘতর:

-1+b+/1 9*(_%;.q.mod).\:x,b:10 xexp#1_$x:

— streetster
সূত্র

এটি স্পষ্টভাবে জানিয়েছে যে: "কোডটি অবশ্যই তাত্ত্বিকভাবে 10 ^ 9 অবধি সমস্ত পূর্ণসংখ্যার জন্য কাজ করবে " । দেখা যাচ্ছে না ...?

— স্টিভি গ্রিফিন

Urgh। তারপরে আমি বোনাসের একটি উত্তর ব্যবহার করব কারণ আমি 10e6 পর্যন্ত গণনা করার চেষ্টা করে মেমরিটি চালিয়ে যাব 10e9 ছেড়ে দেওয়া যাক। পরে ঠিক করবে।

— স্ট্রিস্টার

0

জেলি , 19 বাইট

æḟ©ræċɗ⁵Ṗ%Þ-9⁸‘_®¤ị

এটি অনলাইন চেষ্টা করুন!

-১ মিঃ এক্সকোডারকে ধন্যবাদ ।

1-ইন্ডেক্স।

— এরিক দ্য আউটগল্ফার
সূত্র

0

জে, 24 বাইট

(]/:([:+/[:".&>":)^:_"0)

এই ছদ্মবেশ প্রকাশটি নিম্নলিখিত কোনও অভিব্যক্তির (আর্গুমেন্টের মতো) অংশ না হয়ে বরং এটি নিজেই আচরণ করা উচিত তা বোঝাতে পেরেনগুলিতে আবৃত থাকে।

'] /:' অর্ডারে (আরোহী '/:') মূল অ্যারে ']' এর সংখ্যার যোগফল + + / দ্বারা অভিব্যক্তিটি

". &> ":

একটি সংখ্যাকে '":' দিয়ে একটি অক্ষর ভেক্টরে রূপান্তরিত করে, তারপরে তার বিপরীত প্রয়োগ করে" "। ' - সংখ্যায় অক্ষর - প্রতিটি '&>' আইটেমের জন্য প্রয়োগ। সুতরাং, 65536 -> '65536' -> 6 5 5 3 6।

শক্তি সংমিশ্রণ '^:' এক্সপ্রেশনটির শেষের নিকটে আমরা সুনির্দিষ্ট কোডটি (বাম দিকে) একটি নির্দিষ্ট সংখ্যক বার ব্যাখ্যা করেছি। এই ক্ষেত্রে, নির্দিষ্ট সময়গুলির নাম হল অনন্ত '_' যার অর্থ ফল পরিবর্তন বন্ধ হওয়া অবধি আবেদন চালিয়ে যাওয়া।

চূড়ান্ত '' 0 'এর অর্থ ডানদিকে প্রতিটি স্কেলারের (0-মাত্রিক) আইটেমে পুরো ভাবটি বাম দিকে প্রয়োগ করা, যা আমরা এটি প্রয়োগ করতে চাইছি এমন সংখ্যার অ্যারে হবে।

— DevonMcC
সূত্র

আপনি কীভাবে ইনপুট তালিকা তৈরি করছেন? আমি কেতে একটি সমাধান লিখছি তবে অর্ধেক উত্তর তালিকাগুলি তৈরি করছে ...

— স্ট্রিস্টার

আমি ধরে নিলাম তালিকাগুলি বহিরাগতভাবে ইনপুট রয়েছে। আমি দেখতে পাচ্ছি না যেখানে তালিকা তৈরি করা সমস্যার অংশ।

— ডিভনএমসিসি

" ইনপুট হিসাবে ইতিবাচক পূর্ণসংখ্যা এন নিন এবং উপরে বর্ণিত ক্রমের n'th সংখ্যাটি আউটপুট দিন।" আপনাকে সিক্যুয়েন্স তৈরি করতে হবে (বা সিক্যুয়েন্সটি উত্পন্ন করার জন্য একটি উপায় সন্ধান করতে হবে - অন্যান্য উত্তর দেখুন)।

— স্ট্রিস্টার

0

এলিক্সির , 239 বাইট

q=:math
e=Enum
r=fn x,f->cond do
x<10->x
1->f.(e.sum(Integer.digits x),f)end end
fn p->e.at(e.at(Stream.unfold({0,[0]},fn {a,c}->{c,{a+1,c++e.sort(trunc(q.pow 10,a)..trunc(q.pow 10,a+1)-1,&r.(&1,r)<=r.(&2,r))}}end),1+trunc q.log10 p),p)end

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা ইনকামিং (আস্তে আস্তে)! আমি মনে করি না এটি এর থেকে আরও খাটো পেতে পারে তবে আমি সর্বদা পরামর্শের জন্য উন্মুক্ত

— ডেভ
সূত্র

0

পার্ল 5 `-pF` , 27 বাইট

$_=9x$#F+$_%10**$#F*9+$F[0]

এটি অনলাইন চেষ্টা করুন!

কোডের একটি দুর্দান্ত কমপ্যাক্ট অংশ নিয়ে আসতে ovs এর সূত্র এবং @ জোনাথন অ্যালেনের ব্যাখ্যা ব্যবহার করে।

— Xcali
সূত্র

পূর্ণসংখ্যা তাদের ডিজিটাল শিকড় অনুসারে বাছাই করা

চ্যালেঞ্জ:

পরীক্ষার কেস:

ব্যাখ্যা:

পাইথন 2 , 78 60 52 46 46 45 বাইট

পাইথন 2 , 78 বাইট

পাইথন 3 , 80 বাইট

কিভাবে এটা কাজ করে

পাইথন 2 , 72 বাইট

পাইথন 2 , 73 71 70 বাইট

জেলি , 15 14 10 9 বাইট

কিভাবে?

হাস্কেল , 94 88 বাইট

রেটিনা , 65 বাইট

পাইথ , 36 31 25 24 23 22 বাইট

এটি কীভাবে কাজ করে (পুরানো)

05 এ বি 1 ই , 19 11 বাইট

পাইথ , 23 বাইট

পার্ল 6 , 68 58 বাইট

সম্প্রসারিত:

রুবি , 43 38 বাইট

জাভা 8, 68 বাইট

K4 , 38 বাইট

জেলি , 19 বাইট

জে, 24 বাইট

এলিক্সির , 239 বাইট

পার্ল 5 -pF , 27 বাইট

পাইথন 2 , _{78 60 52 46 46} 45 বাইট

পার্ল 5 `-pF` , 27 বাইট