অ্যারে ফ্যাক্টরাইজেশন

Question

ধনাত্মক পূর্ণসংখ্যার অ্যারে দেওয়া, এই পূর্ণসংখ্যার স্বতন্ত্র প্রধান কারণগুলির স্থিতিস্থ অ্যারে আউটপুট দেয়। অন্য কথায়, ইনপুটটিতে প্রতিটি পূর্ণসংখ্যার জন্য ক্রম হিসাবে, এর প্রধান উপাদানগুলি পান, সেগুলি সাজান, এবং আউটপুটে ইতিমধ্যে আউটপুটে না থাকা কোনও প্রাইম যুক্ত করুন।

পরীক্ষার কেস

[1,2,3,4,5,6,7,8,9,10] -> [2,3,5,7]
[10,9,8,7,6,5,4,3,2,1] -> [2,5,3,7]
[100,99,98,1,2,3,4,5] -> [2,5,3,11,7]
[541,60,19,17,22] -> [541,2,3,5,19,17,11]
[1,1,2,3,5,8,13,21,34,45] -> [2,3,5,13,7,17]
[6,7,6,7,6,7,6,5] -> [2,3,7,5]
[1] -> []
[8] -> [2]
[] -> []

আউটপুট একটি অ্যারের হিসাবে বা পূর্ণসংখ্যার বা স্ট্রিংগুলির তালিকা, সীমিত আউটপুট, বা সংখ্যার আদেশযুক্ত তালিকার আউটপুট দেওয়ার কোনও অন্যান্য মানক উপায় হতে পারে।

এটি কোড-গল্ফ , তাই বাইট জেতে সংক্ষিপ্ত উত্তর।

Comments

স্যান্ডবক্স

— স্টিফেন

এটি সেই চ্যালেঞ্জগুলির মধ্যে একটি যা আমি মনে করি এটি "খুব সাধারণ"। প্রায় প্রতিটি উত্তর হ'ল এর মধ্যে একটির মতো দেখতে: (ক) ইনপুটটির উপর একটি লুপ এবং শর্তাধীন সংযোজন সহ ইয়ে ওল্ড প্রাইম ফ্যাক্টরিয়েশন কোড; (খ) চারটি বিল্ট-ইনগুলির একটি শৃঙ্খল। সৃজনশীলতার জন্য খুব বেশি জায়গা নেই। উত্তরগুলি আমাকে ভুল প্রমাণ করবে, তবে আমি এটি সন্দেহ করি। এখানে প্রাথমিক কারণের চেয়ে গল্ফের খুব বেশি কিছু আছে, এবং তা মৃত্যুর মুখোমুখি হয়েছে।

— লিন

@ লিন এটি গল্ফিং ল্যাংসের জন্য তুচ্ছ, তবে প্রায় সব কিছুর জন্য অপ্রয়োজনীয়। নিশ্চিত নয় যে এখানে তুচ্ছতার কারণ রয়েছে: /

— স্টিফেন

আপনি কি আমাকে বলতে পারবেন যে 1 এর "স্বতন্ত্র প্রধান উপাদান"?

— J42161217

নিবন্ধন করুন অন্যথায় এটি কেবল "ইনপুটটির সমস্ত মৌলিক কারণগুলির সেট আউটপুট" হবে

— স্টিফেন

Answer 1

05 এ বি 1 ই , 3 বাইট

স্ট্রিংগুলির তালিকা হিসাবে আউটপুট।

f˜Ù

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

2sable , 3 বাইট

হ্যাঁ, এটি 2sable এও কাজ করে। স্ট্রিংগুলির একটি তালিকাও ফেরত দেয়।

f˜Ù

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

Comments

Hah ... f U। এটা ভাল।

— ম্যাজিক অক্টোপাস আরন

@ ম্যাজিক অ্যাক্টোপাস ইউরন ধন্যবাদ :-)

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

Answer 2

কাস্তে , 3 বাইট

@ জাগারবকে ধন্যবাদ 1 বাইট সংরক্ষিত ।

uṁp

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

---

ব্যাখ্যা

uṁp সম্পূর্ণ প্রোগ্রাম।

  p প্রতিটি প্রধান উপাদান।
 list মানচিত্রে ফাংশন তালিকার উপরে এবং ফলাফলকে যুগোপযোগী করে।
ইউ অনন্য। 

Comments

Σ†হতে পারে ṁ।

— জাগারব

@ জাগারব অনেক ধন্যবাদ যেমন আপনি বলতে পারেন, এটি আমার প্রথম

— হুস্কের

নতুন লোককে হুস্ক ব্যবহার করে দেখে ভাল লাগল। :)

— জাগারব

@ জাগারব এটি খুব সুন্দর বলে মনে হচ্ছে (বিশেষত যখন এটি জেলিকে ছাড়িয়ে যায়: পি)

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

Answer 3

বাশ + জিএনইউ ইউটিলিটিস, 37

• 21 বাইট সংরক্ষিত হয়েছে @ মুরুকে ধন্যবাদ (বাহ!)

factor|tr \  \\n|awk '!/:/&&!a[$0]++'

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

Comments

আমি মনে করি এটি nl|sort|...ব্যবহার করে করা যেতে পারে awk: awk '!a[$0]++'(আগে না দেখলে মুদ্রণ করুন; যাতে অর্ডারটি কখনও ক্ষতি হয় না), 15 বাইট সংরক্ষণ করে। তারপরে sedকমান্ডটি আরও দীর্ঘ একটি ব্যবহার করে মুছে ফেলা যায় awk: factor|awk '!/:/&&!a[$0]++' RS='[ \n]+'(স্পেস এবং নিউলাইনগুলিতে রেকর্ডগুলি বিভক্ত করুন, রেকর্ডগুলি এড়িয়ে যান :), আরও 4 টি বাইট সংরক্ষণ করুন।

— মারু

আমি শুধু উপলব্ধি আমি ব্যবহার দ্বারা পূর্ববর্তী মন্তব্যে দুই বাইট সংরক্ষণ করতে পারবেন tr: factor|tr \ \\n|awk '!/:/&&!a[$0]++'(যে প্রথম ব্যাকস্ল্যাশ দুই খালি স্থান নয়)

— muru

@ মুরু আশ্চর্য - ধন্যবাদ! (আপনি যদি নিজের উত্তর হিসাবে এটি পোস্ট করেন তবে আমি হতাশ হব না - যেটি আমার মূলটিকে উল্লেখযোগ্যভাবে প্রকাশিত হয়েছে)

— ডিজিটাল ট্রমা

Answer 4

এমএটিএল , 6 বাইট

"@Yfvu

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

ব্যাখ্যা:

"      % Loop over input
 @     % Push the array element
  Yf   % Prime factors
    v  % Concatenate entire stack vertically (does nothing the first iteration)
     u % Stably get distinct (unique, in MATLAB terminology) elements. Does so every loop but this is code golf, not fastest code.

আকর্ষণীয় এমএটিএল টিডবিটস: সাধারণত, সমস্ত ফাংশন ভেক্টরগুলিতে (অ্যারে) ঠিক তত সহজে প্রয়োগ হয়। তবে এই ক্ষেত্রে, প্রতিটি ইনপুটগুলির জন্য উপাদানগুলির সংখ্যা পরিবর্তনশীল, এবং মতলব এবং এক্সটেনশন দ্বারা এমএটিএল সাধারণত বর্গ ম্যাট্রিকগুলিতে ডিল করে, তাই আমাকে লুপের জন্য একটি ব্যবহার করতে হয়েছিল "।

তদ্ব্যতীত, এমএটিএল-এর দুটি প্রধান কনক্রিটেশন অপারেটর রয়েছে: hএবং v, অনুভূমিক এবং উল্লম্ব সংমিশ্রণ। তাদের আচরণে উল্লেখযোগ্যভাবে পার্থক্য রয়েছে: vপুরো স্ট্যাকটিকে সম্মতি জানায়, এমনকি যদি এটিতে আমাদের প্রথম পুনরাবৃত্তির মতো একটি উপাদান থাকে। hঠিক দুটি উপাদান নেয় এবং কেবলমাত্র একটি উপস্থিত থাকলে ব্যর্থ হবে, এই অ্যাপ্লিকেশনটির জন্য এটি উপযুক্ত নয়।

Answer 5

ব্র্যাচল্যাগ , 6 বাইট

ḋᵐ↔ᵐcd

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

ব্র্যাচল্যাগ , 6 বাইট

ḋᵐoᵐcd

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

---

ব্যাখ্যা

prime প্রধান পচন সহ মানচিত্র (যা বিপরীত ক্রমে উপাদানগুলি প্রদান করে)।
  Each প্রতিটি বিপরীত (বা oᵐ - প্রতিটি অর্ডার)।
    c কনকেটেনেট (সমতল)।
     d প্রতিলিপি।

Answer 6

পাইথ , 5 4 বাইট

{smP

এখানে চেষ্টা করুন! বা সমস্ত পরীক্ষার কেস যাচাই করুন।

বিকল্প: {sPM

---

ব্যাখ্যা

imp এসএমপি সম্পূর্ণ প্রোগ্রাম অন্তর্নিহিত ইনপুট (কিউ) সহ।
  এম ইনপুট উপর মানচিত্র।
   পি প্রধান উপাদান।
 s সমতল।
Ed অনুলিপি

Answer 7

পাওয়ারশেল , 102 বাইট

param($x)$a=@();$x|%{$a+=(2..($z=$_)|?{!($z%$_)-and'1'*$_-match'^(?!(..+)\1+$)..'}|sort)};$a|select -u

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

( "আমাকে আমার পিছনে শয়তান-প্রধানমন্ত্রী পেয়ে যান!" -এর উপর টেসেল্ল্যাটিংহেকলারের জবাব থেকে ফ্যাক্টেরাইজেশন ধারণা নেওয়া হয়েছে )

আক্ষরিক অ্যারে হিসাবে ইনপুট নেয় $x। একটি নতুন ফাঁকা অ্যারে তৈরি করে $a। লুপ শেষ $x। প্রতিটি পুনরাবৃত্তি আমরা 2বর্তমান সংখ্যায় লুপ করব , এটি একটি ফ্যাক্টর -andপ্রাইম কিনা তা পরীক্ষা করে , তারপরে |sortআউটপুট এবং এটিকে সংযোজন করি $a। যখন আমরা মধ্য দিয়ে যাবার কাজটি শেষ $xকরি, তখন আমরা আউটপুট করি $aতবে এর |selectকেবলমাত্র নির্দিষ্ট -uসংখ্যাগুলি। সমস্যাটি বর্ণনার সাথে মেলে এমন প্রথম ঘটনাটি ধরে রেখে অনন্যকরণটি বাম থেকে ডানে চলে যায় এই সত্যটি কাজে লাগায়। এই সংখ্যাগুলি পাইপলাইনে রেখে গেছে এবং আউটপুট অন্তর্ভুক্ত।

Answer 8

সিজেম, 11 বাইট

{:mfe__&1-}

ফাংশন যা ints এর অ্যারে নেয় এবং ints এর অ্যারে আউটপুট দেয়।

পরীক্ষার সংস্করণ

Comments

আমি একাধিক অক্ষরের সাথে আউটপুটকে কীভাবে আলাদা করব? কমপক্ষে আমার (অনলাইন) পরীক্ষার জন্য এটি একটি স্ট্রিং আউটপুট দেয়, ইনটসের অ্যারে নয়।

— স্টিফেন

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

— জিওকাভেল

আমি বিশ্বাস করি স্ট্যাক-ভিত্তিক ল্যাংগুলি যাইহোক টস দ্বারা আউটপুট পেতে পারে, সুতরাং এটি ঠিক আছে, আমি কেবল ভাবছিলাম। ধন্যবাদ।

— স্টিফেন

Answer 9

গাইয়া , 4 বাইট

ḍ¦_u

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

---

ব্যাখ্যা

each প্রতিটি প্রধান উপাদান।
  _ তালিকাটি সমতল করুন।
   u সদৃশ উপাদানগুলি সরান।

Answer 10

জেলি , 5 4 বাইট

তালি দেওয়ার জন্য 1 বাইট ধন্যবাদ।

ÆfFQ

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

Comments

অবাক না।

— লিকি নুন

আপনার ভেক্টরাইজেশনকে জোর করে চাপিয়ে দেওয়া দরকার মনে করবেন না Æf, যাতে আপনি সম্ভবত বাইট ছাড়তে পারেনÆfFQ

— তালি

@ ক্ল্যাপ আমি একটি বোকা ...

— লিকি নুন

Answer 11

পাইকে , 4 বাইট

MPs}

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

---

ব্যাখ্যা

MP       Prime factors of each.
  s      Flatten.
   }     Deduplicate.

Answer 12

গণিত, 64 বাইট

Select[DeleteDuplicates[First/@FactorInteger@#~Flatten~1],#>1&]&

ইনপুট

[{100, 99, 98, 1, 2, 3, 4, 5}]

Comments

Select[#&@@@Gather[#&@@@Join@@FactorInteger@#],#>1&]&

— ম্যাট্রিক্স 89

Answer 13

হাস্কেল, 77 বাইট

import Data.List
x!y|y>x=[]|x`mod`y<1=y:(x`div`y)!y|1<2=x!(y+1)
nub.((!2)=<<)

ব্যাখ্যা:

• x!yঅপারেটর আয় প্রতিটি মৌলিক উত্পাদকই আপনাকে একটি তালিকা xযে তার চেয়ে অনেক বেশী হয় বা সমানy
• (!2)ফাংশন তার যুক্তির প্রতিটি মৌলিক উত্পাদকই আপনাকে একটি তালিকা ফেরৎ
• শেষ লাইনে ফাংশন প্রয়োজনীয় কার্যকারিতা কার্যকর করে

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

Answer 14

ব্র্যাচল্যাগ , 6 বাইট

ḋᵐoᵐcd

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

ব্যাখ্যা

ḋᵐ         Map prime decomposition
  oᵐ       Map order
    c      Concatenate
     d     Remove duplicates

Comments

জন্য ফেইস [10,9,8,7,6,5,4,3,2,1]। এটি হওয়া উচিত [2, 5, 3, 7], না[2, 3, 5, 7]

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

আপনি এটি +1 বাইটের জন্য ঠিক করতে পারেন:ḋᵐoᵐcd

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

@ মিঃ এক্সকোডার ধন্যবাদ, স্থির। যদিও বেশ অ-সংবেদনশীল প্রয়োজন ইমো।

— 27 এ ফ্যাটালাইজ করুন

এটি আসলে অ-সংবেদনশীল নয়, কারণ এটি একটি ক্ষুদ্র, ক্ষুদ্র কিছুটা কম তুচ্ছ। আমি আমার নিজের উত্তরটিও পোস্ট করেছি, তবে আমি আদেশের পরিবর্তে প্রথমে বিপরীত ব্যবহার করেছি। বিপরীত ক্রমে মূল কারণগুলি কেন উত্পাদিত হয়েছে তা নিশ্চিত নন?

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

@ ফ্যাটালাইজ করুন - চ্যালেঞ্জটি "তালিকার স্বতন্ত্র প্রধান উপাদানগুলি বাছাই করা নয়," এটি "তালিকার মধ্য দিয়ে পুনরাবৃত্তি করে এবং স্বতন্ত্র প্রধান উপাদান যুক্ত করে।"

— স্টিফেন

Answer 15

ওহম ভি 2, 3 বাইট

তবুও অন্য 3-বাইটার (স্ব-ভেক্টরাইজেশন সহ ভাষাগুলি ধন্যবাদ)।

m{U

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

---

ব্যাখ্যা

মি প্রাইম ফ্যাক্টর। ইনপুট উপর অটো-ভেক্টরাইজ।
 T সমতল।
  ইউ ইউনিফাইফ।

Answer 16

জাপট , 6 বাইট

mk c â

এটা পরীক্ষা করো

---

ব্যাখ্যা

অ্যারের অন্তর্নিহিত ইনপুট U। mএটির উপরে মানচিত্র ( ) তৈরি করুন k, প্রতিটি উপাদানের গুণক ( ) পাচ্ছেন । সমতল ( c), অনন্য উপাদান ( â) এবং স্পষ্টভাবে আউটপুট পান।

Answer 17

পাইথন 3 , 128 125 116 বাইট

এটি একটি খাঁটি পাইথন সমাধান। প্যাকেজ নেই। 9 টি বাইট সংরক্ষণের জন্য হালভার্ডকে ধন্যবাদ।

def f(l):y=[k for i in l for k in range(2,i+1)if i%k<1*all(k%x for x in range(2,k))];print(sorted({*y},key=y.index))

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

পাইথন 2 , 133 127 126 বাইট

def f(l):y=sum([[k for k in range(2,i+1)if i%k<1*all(k%x for x in range(2,k))]for i in l],[]);print sorted(set(y),key=y.index)

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

পাইথন 2 , 142 138 134 বাইট

l=input();r=[]
for i in sum([[k for k in range(2,i+1)if i%k<1*all(k%x for x in range(2,k))]for i in l],[]):r+=[i]*(i not in r)
print r

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

খুব আশ্চর্য এখনও পাইথনের কোনও উত্তর নেই। গল্ফিং উপর কাজ।

Comments

116 বাইট পাইথন 3

— হালওয়ার্ড হুমেল

@ হালওয়ার্ডহুমেল ধন্যবাদ

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

Answer 18

ডিওর্স্ট , 16 বাইট

EDkE]l1FeFPkEQE_

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

ডিওর্ট চ্যাটরুমে @cairdcoinheringaahing এর সাহায্যে সম্পন্ন হয়েছে (দ্রষ্টব্যগুলি পৃথক পৃথক))

---

ব্যাখ্যা

EDkE] l1FeFPkEQE_ সম্পূর্ণ প্রোগ্রাম।

ইডি প্রতিটি উপাদানের বিভাজকের তালিকাটি পুশ করুন।
  কে স্ট্যাকটিকে পুনঃক্রম থেকে আটকাবেন।
   ই] স্ট্যাকটি সমতল করুন।
     l1Fe স্ট্যাক থেকে 1s সরান (কারণ দাতাগুলি ছুটে এসে 1 জন প্রধান তৈরি করেছে!) - ভবিষ্যতের ভাষা প্রকাশে অপসারণ করা উচিত।
         এফপি প্রাইম রাখুন।
           কে স্ট্যাকটিকে পুনঃক্রম থেকে আটকাবেন।
            ইস কিউ নকল।
              E_ ফলাফল আউটপুট।

Answer 19

ডিওর্স্ট , 16 বাইট

EDkE]EQFPkl1FeE_

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

@ মিস্টার এক্সকোডার এর সাহায্যে সম্পন্ন হয়েছে। এটি সিউডোগলফিং ভাষার জন্য দীর্ঘ।

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

EDkE]EQFPkl1FeE_ - Full program, implicit input: [1,2,3,4,5]

ED               - Get divisors. Vectorizes. STACK = [[1], [1,2], [1,3], [1,2,4], [1,5]]
  k              - Turn off sorting for the next command
   E]            - Flatten the stack. STACK = [1, 1, 2, 1, 3, 1, 2, 4, 1, 5]
     EQ          - Deduplicate stack in place. STACK = [1, 2, 3, 4, 5]
       FP        - Filter by primality 1 is considered prime. STACK = [1, 2, 3, 5]
         k       - Turn off sorting for the next command
          l1     - Push 1. STACK = [1, 2, 3, 5, 1]
            Fe   - Filter elements that are equal to the last element. STACK = [2, 3, 5]
              E_ - Output the whole stack

Answer 20

পাইকে , 4 বাইট

mPs}

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

mP   -   map(factorise, input)
  s  -  sum(^)
   } - uniquify(^)

Comments

আউচ, আমি আপনাকে খারাপভাবে নিনজ করেছি - ভাল আমাদের ভিন্ন দৃষ্টিভঙ্গি রয়েছে :)

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

: পি ওয়ান বাইট পার্থক্য। আমি মনে করি এটি পড়ার পরে বা সর্বনিম্ন সর্বসম্মত মতামত অনুসারে অনুমোদিত

— ব্লু

হ্যাঁ, সদৃশ

— জবাবগুলি

Answer 21

অক্টাভা, 61 বাইট

a=input('');b=[];for c=a(a>1)b=[b setdiff(factor(c),b)];end;b

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

Answer 22

আমার, 17 বাইট

⎕Ḋḟ’⊢f(‘53ǵ'ƒf(ū←

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

কিভাবে?

• ⎕ মূল্যায়ন ইনপুট
• Ḋ বিভাজক (ভেক্টরাইজ / ভিসিফাইজ)
• ḟ চেপটান
• ’⊢f(‘হ্রাস, ফিল্টার, বৃদ্ধি (অপসারণ 1)
• 53ǵ''P'এমওয়াইয়ের কোডপেজের স্ট্রিংটি যা প্রাথমিক পরীক্ষা testing দুঃখজনকভাবে 0x35=5316 তম সংখ্যা, এবং 16স্ট্যাক> _ <এ চাপানোর জন্য কোনও আদেশ নেই ।
• ƒ একটি ফাংশন হিসাবে
• f( যে দ্বারা ফিল্টার
• ū uniquify
• ← আউটপুট

Answer 23

সি ++, 118 বাইট

[](auto n){decltype(n)r;for(int m:n)for(int i=1,j;i++<m;){j=m%i;for(int x:r)j|=!(i%x);if(!j)r.push_back(i);}return r;}

একটি ইনপুট পাস করার প্রয়োজন std::vector<int>, std::vector<int>আউটপুট জন্য অন্য প্রদান।

Answer 24

জে, 10 বাইট

~.(#~*),q:

আমি নিশ্চিত যে কিছু চালাক জে-এর এই সংক্ষিপ্ত করতে পারে।

Answer 25

আসলে , 5 বাইট

♂y♂i╔

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

ব্যাখ্যা:

♂y♂i╔
♂y     prime factors of each element
  ♂i   flatten
    ╔  deduplicate (stable)

Answer 26

পাইথন 2, 88 119 103 বাইট

এখানে আমরা যাই। সঠিক বাছাই সহ।

def f(l,s=[]):[s.append(x) for x in sum([list(primefac(i)) for i in l],[]) if x not in s];print s
from primefac import*

আগ্রহীভাবে আমি এটি টিআইওতে কাজ করতে পারি না, কারণ প্যাকেজটি সমর্থিত নয়। এটি আমার মেশিনে চালিত হয়। আমার পরীক্ষার ফলাফলগুলি এখানে:

f([1,2,3,4,5,6,7,8,9,10],[])     #[2, 3, 5, 7]
f([10,9,8,7,6,5,4,3,2,1],[])     #[2, 5, 3, 7]
f([100,99,98,1,2,3,4,5],[])      #[2, 5, 3, 11, 7]
f([541,60,19,17,22],[])          #[541, 2, 3, 5, 19, 17, 11]
f([1,1,2,3,5,8,13,21,34,45],[])  #[2, 3, 5, 13, 7, 17]
f([6,7,6,7,6,7,6,5],[])          #[2, 3, 7, 5]
f([1],[])                        #[]
f([8],[])                        #[2]
f([],[])                         #[]

কোনওভাবে আমি ল্যাম্বদা-ফাংশন হিসাবে ফাংশনটি করতে সক্ষম হইনি। আমি যখনই তালিকার বোধগম্যতা ফিরিয়ে দেওয়ার চেষ্টা করব তখন এটি [কিছুই নেই, কিছুই নয়, ...] ফিরে আসে। আমি যদি কিছু উপেক্ষা করে থাকি তবে কেউ কি সেই ভুলটিকে নির্দেশ করতে পারে? সাহায্য করার জন্য ধন্যবাদ!

---

সম্পাদনা:

মিঃ এক্সকোডার্সকে অ্যালগরিদম বাছাই করে আমি কোডটি 16 বাইট দ্বারা কেটে ফেলতে পারি। এই অংশের জন্য আপনাকে ধন্যবাদ।

from primefac import*
def f(l):a=sum([list(primefac(i))for i in l],[]);print sorted(set(a),key=a.index)

Comments

এটি সঠিক বলে মনে হচ্ছে না। দ্বিতীয় পরীক্ষার কেস আউটপুট করা উচিত [2, 5, 3, 7]। আউটপুট বিষয়গুলির ক্রম।

— মেগো

sorted(set().union(*map(primefac,l)))

— অ্যালেক্স হল

আউটপুটগুলির ক্রমটি গুরুত্বপূর্ণ। ব্যাখ্যাটি পুনরায় পড়ুন, বা অন্য উত্তরগুলি দেখুন - অন্য কীভাবে এটি ব্যাখ্যা করতে হয় তা আমি জানি না।

— স্টিফেন

@Stephen। সঠিক আউটপুট সহ রুটিন আপডেট হয়েছে। আমি প্রতিটি লাইনের পার্থক্য লক্ষ্য না করা পর্যন্ত আমাকে কিছুটা সময় নিয়েছে। পড়ার সময় ফোকাস অনেক সাহায্য করে।

— সাইমন

@ সিমোন পেরেনগুলির পরে স্থানগুলি ছাড়িয়ে তিনটি বাইট সংরক্ষণ করুন - s.append(x) for-> s.append(x)for, primefac(i)) for-> primefac(i))for, []) if->[])if

— স্টিফেন

Answer 27

ব্রেনল্ফ , 7 বাইট

&(p)u=;

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

ওহ দেখুন, এটি মূলত 4 বিল্ট-ইনগুলির একটি শৃঙ্খল

ব্যাখ্যা

&(p)u=;  Implicit input from commandline args
 (.)     Sandbox loop, sandboxes each item in a separate stack and runs the
         code within the loop.
&        Append the entire sandboxed stack when loop ends, rather than only the
         top of stack after each iteration
  p      Prime factors
    u    Unique
     =   Print stack
      ;  Suppress implicit output

Comments

ব্যর্থ [10,9,8,7,6,5,4,3,2,1]। - অর্ডারটি গুরুত্বপূর্ণ: [2, 5, 3, 7]পরিবর্তে আপনার ফিরে আসা উচিত [2, 3, 5, 7]।

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

যদিও আপনি এটি -1 বাইটের জন্য ঠিক করতে পারেন । যেহেতু Kএখানে কেবল ক্ষতি করে।

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

@ মিঃ এক্সকোডার ওহ হ্যাঁ, বুঝতে পারলেন না যে তাদের উপস্থিতি অনুসারে করা উচিত ছিল, আরোহী ক্রম নয়। স্থির

— স্কিডদেব

Answer 28

এপিএল (ডায়ালগ প্রসারিত) , 4 বাইট ^{এসবিসিএস}

∪∘∊⍭

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