गणितज्ञ, 50 -> 47 -> 42 बाइट्स
p = Join[Range[2, #, 2], Range[1, #, 2]] &
इसे ऑनलाइन आज़माएं!
दो गुना गुना अनुकूलन क्षमता की ओर इशारा करने के लिए user202729 को धन्यवाद दें [शामिल हों] फ्लैटन के [] और शुद्ध कार्यों का उपयोग करने के लिए प्रेरित करें।
मैं दो टिप्पणियां जोड़ना चाहूंगा।
1) ओपी के अनुरोध के अनुसार n> = 4 के लिए कोई गिरती या बढ़ती उत्तराधिकार के साथ एक विशिष्ट क्रमांकन का निर्माण करना काफी सरल है।
इसमें दो लगातार सूची शामिल हैं।
यहां तक कि n के लिए ये हैं:
list1 = (2,4, ..., n / 2)
list2 = (1,3, ..., n 2-2)
विषम n के लिए हमारे पास:
list1 = (2,4, ..., तल [n / 2])
सूची 2 = (1,3, ..., तल [n / 2])
इस "एल्गोरिथ्म" के लिए बस एक निर्णय होना चाहिए (n सम या विषम), बाकी सिर्फ n संख्या लिख रहा है।
शीर्ष पर एक संभावित गणितीय समाधान प्रदान किया जाता है।
2) एक संबंधित प्रश्न यह है कि n के कार्य के रूप में इस तरह के कई क्रम कितने हैं।
गणितज्ञ, 124 बाइट्स
a[0] = a[1] = 1; a[2] = a[3] = 0;
a[n_] := a[n] = (n + 1)*a[n - 1] - (n - 2)*a[n - 2] - (n - 5)*a[n - 3] + (n - 3)*a[n - 4]
इसे ऑनलाइन आज़माएं!
उदाहरण:
a[#] & /@ Range[4, 12]
{2, 14, 90, 646, 5242, 47622, 479306, 5296790, 63779034}
इस तरह के क्रमपरिवर्तन की संख्या को गिनना एक मानक समस्या है।
N = 4 के लिए 2 हैं: {{2,4,1,3}, {3,1,4,2}}
N = 5 के लिए 14 हैं: {{1,3,5,2,4}, {1,4,2,5,3}, {2,4,1,3,5}, {2,4 1,5,3} {2,5,3,1,4} {3,1,4,2,5} {3,1,5,2,4} {3,5,1, 4,2}, {3,5,2,4,1} {4,1,3,5,2} {4,2,5,1,3} {4,2,5,3, 1} {5,2,4,1,3} {5,3,1,4,2}}
इन क्रमपरिवर्तन की संख्या (n) शीघ्रता से बढ़ती है: 2, 14, 90, 646, 5242, 47622, 479306, 5296790, 63779034, ...
बड़े n के लिए अनुपात a (n) / n! लगता है कि सीमा 1 / e ^ 2 = 0.135335 के पास है ... मेरे पास कोई सख्त सबूत नहीं है लेकिन यह संख्यात्मक प्रमाणों से एक अनुमान है। आप कार्यक्रम को ऑनलाइन चलाने की कोशिश करके इसका परीक्षण कर सकते हैं।
उपरोक्त कार्यक्रम (नीचे दिए गए संदर्भ के आधार पर) इन संख्याओं की गणना करता है।
आप OEIS: A002464 पर संबंधित अनुक्रम में अधिक जानकारी प्राप्त कर सकते हैं । हर्ट्ज़स्प्रंग की समस्या: प्रत्येक पंक्ति और स्तंभ में 1 के साथ, एक n X n बोर्ड पर n गैर-हमलावर राजाओं की व्यवस्था करने के तरीके। बढ़ती या गिरती उत्तराधिकार के बिना लंबाई n के क्रमपरिवर्तन की संख्या।