Видеть здесь: c# - перечисление всех перестановок строки/целого числа - переполнение стека[^]
5ed!
Цитата:Есть ли простой способ достичь этого?
Цитата:например первые 10 перестановок
Я не получаю домашнее задание, я не ребенок.
Но вы все еще не знаете, что мы помогаем исправить ваш код, но я не вижу здесь никакого кода.
Но я перепробовал так много различных функций, и ни одна из них не дает мне возможности подняться только до определенного числа, поэтому я ищу новый способ подойти к этому.
Честно говоря, если вы можете написать код для выполнения перестановок, но не имеете ни малейшего представления о том, как "остановиться после n значений", то вам действительно следует подумать о том, чтобы вернуться в школу и учиться снова - это тривиально! Это что, три строки кода, включая объявление переменной? Возможно, два, если вы используете предварительное приращение?
5ed!
Есть ли какая-то конкретная причина, когда она ничего не делает для решения этого вопроса?
Спасибо.
Как я уже упоминал ранее (решение было удалено, поскольку оно было - по вашему мнению - не связано с вопросом), результат, который вы хотите получить, не является перестановка[^].
Если вы заинтересованы в реализации метода, который производит набор последовательностей,
Основываясь на ссылке, предоставленной в решении № 1 компанией OriginalGriff[^], я перевел Linq C# GetPermutations метод в VB.NET форма:
Sub Main
Dim chars As String = "ABCD"
Dim count = 10
'get 10 permutations of ABCD arranged into 3-part sequences
Dim result = GetPermutations(chars.ToArray(), 3).Take(count)
For Each r In result
Console.WriteLine("{0}", String.Join("", r))
Next
End Sub
Function GetPermutations(Of T)(list AS IEnumerable(Of T), length As Integer) AS IEnumerable(Of IEnumerable(Of T))
If length = 1 Then Return list.Select(Function(o) New T(){o})
Return GetPermutations(list, length - 1) _
.SelectMany(Function(a) list.Where(Function(e) Not a.Contains(e)), Function(t1, t2) t1.Concat(New T(){t2}))
End Function
ABC ABD ACB ACD ADB ADC BAC BAD BCA BCD
For i = 1 To chars.Length
Dim result = GetPermutations(chars.ToArray(), i).Take(count)
For Each r In result
Console.WriteLine("{0}", String.Join("", r))
Next
Next
Swap и GetPer методы, предлагаемые так.