Codegolf - Исчезающие Элементы

Учитывая строку

 
 
 S = 'abc', x = [0]
'abc'
'bc'

S = 'abc', x = []
'abc'

S = 'abc', x = [2, 0, 0]
'abc'
'ab'
'b'
''

S = '', x = []
''

S = 'codegolfing', x = [10, 9, 8, 3, 2, 1, 0]
'codegolfing'
'codegolfin'
'codegolfi'
'codegolf'
'codgolf'
'cogolf'
'cgolf'
'golf'
 
 
 

Например, учитывая S and [A-Za-z0-9] ,

Ваша задача выполнить этот процесс, собрать значения X after each operation, and display each on a newline in order. The final answer would be

• Это значит, что ваш код должен быть как можно короче.
• Вы можете предположить, что значения в S are always valid indices for 0 1 2 3 4 5 6 7 | c o d e g o l f | Remove 1 c d e g o l f | Remove 4 c d e g l f | Remove 4 c d e g f | Remove 0 d e g f | Remove 2 d e f , и вы можете использовать индексацию с отсчетом от 0 или от 1.
• Строка будет содержать только X = [1, 4, 4, 0, 2]
• Или S = 'codegolf' or S может быть пустым. Если S is empty, it follows that S также должно быть пустым.
• Вы также можете взять X as a list of characters instead of a string.
• Вы можете либо распечатать вывод, либо вернуть список строк. Допускаются начальные и конечные пробелы. Любая форма вывода хороша, если она легко читаема.

Тестовые случаи

#код-гольф #код-гольф #строка #массив

Хаскель, 38 33 байта

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 X,S=input()
for a in X:

print S

S=S[:a]+S[a+1:]
print S
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Прямо вперед: повторно берите элементы до и после индекса i, соединяйте их и собирайте результаты.

Попробуйте онлайн!

Изменить: @Lynn сохранила 5 байт. Спасибо!

JavaScript (ES6), 57 50 48 45 42 байта

Принимает строку как массив отдельных символов, выводит массив, содержащий исходную строку, разделенную запятыми, за которой следует подмассив строк, разделенных запятыми, для каждого шага.

• 3 байта сэкономлены благодаря Арно Предлагая мне злоупотреблять свободной спецификацией вывода больше, чем раньше, что привело меня к еще большему злоупотреблению ею ради еще одной экономии 3 байтов.

Проверьте это

Объяснение

Мы принимаем два входа через параметры 11,10,9,4,3,2,1, codegolfing (the string array) and òdt,GÙ@-|xHx (целочисленный массив) в синтаксисе каррирования, что означает, что мы вызываем функцию с помощью + Add the string to the list ⟪Seḥ+⟫⊣ Cumulatively reduce by this block: S Split around index n e Dump the list ḥ Remove the first char of the second part + Concatenate back together ṣ Join the result with newlines .

Мы создаем новый массив и начинаем его с исходного +⟪Seḥ+⟫⊣ṣ . However, as the V+E0sQ .(QN Метод, который мы будем использовать позже, изменяет массив, нам нужно сделать его копию, что мы можем сделать, преобразовав ее в строку (просто добавьте пустую строку).

Чтобы сгенерировать подмассив, мы V+E0Q .(QN over the integer array (…n⟇ # 'o' flag forces output of the last value ( # For every number in the list... … # Print the string without popping n # Get the current value ⟇ # Remove the char at the index # The result is printed on next iteration (где (…n⟇ is the current integer) and, for each element, we o 1 элемент из >@({&.>/\.&.|.@;<^:4"0) , beginning at index S=>I=>{for(int i=0;;S=S.Remove(I[i++],1))System.Console.WriteLine(S);} . Возвращаем измененный i % Input string. Input has to be done explicitly so that the string % will be displayed even if the row vector of indices is empty i % Input row vector of indices " % For each t % Duplicate current string [] % Push empty array @ % Push current index ( % Assignment indexing: write [] to string at specified index % End (implicit). Display stack (implicit) , again making a copy of it by converting it to a string.

Япт, 6 байт

Проверьте это онлайн!

Объяснение

Альтернативно:

Это работает, потому что удаление элемента по индексу -1 does nothing and so returns the original string.

Шелуха, 7 байт

Сначала принимает строку, затем индексы (отсчитываемые от 1). Попробуйте онлайн!

Объяснение

Питон 2, 43 байта

Попробуйте онлайн!

Любая форма вывода хороша, если она легко читаема.

Итак, это печатается как списки символов.

Питон 2, 47 байт

Это можно было бы сократить до 43 байта, как отметил @LuisMendo, но это уже решение @ErktheOutgolfer.

Попробуйте онлайн!

Java 8, 78 байт

Это лямбда с карри, от -ne to a consumer of $i или $s . Вывод выводится на стандартный выход.

Попробуйте онлайн

05AB1E, 11 байт

Попробуйте онлайн!

Математика, 70 байт

Попробуйте онлайн!

Р, 46 32 байта

Попробуйте онлайн!

Принимает ввод в виде списка символов и [char[]] is 1-based. param($s,$x),-1+$x|%{$z=$_;$i=0;-join($s=$s|?{$z-ne$i++})} является R-эквивалентом .u.DNYEz , the function in this case is $#1 что является подмножеством. Перебирает $2$3$4 because negative indexing in R removes the element, and ¶.* установлено на $#1 , with ((?<-1>.)*) (.*) поэтому мы накапливаем промежуточные результаты.

Р, 80 байт

функция с двумя аргументами, принимает ( . ¶) 1-indexed. Takes $#1 как строка.

Попробуйте онлайн!

Хаскелл, 33 байта

Попробуйте онлайн!

q/kdb+, 27 10 байт

Решение:

Примеры:

Объяснение:

Пользуется преимуществом сходиться функциональность ¶\d+ as well as drop ¶\d+ ¶¶1$&$* +1`(?=.*¶¶.(.)*)(((?<-1>.)*).(.*)¶)¶.* $2$3$4 .

Примечания:

Если бы нам не нужно было печатать исходный результат, это было бы 2 байт в =svõyǝ= :

PowerShell, 94 84 байта

Попробуйте онлайн!

Принимает ввод -join$a as a string and $a как явный массив. Затем мы создаем -join based on .removeAt() как список.

Массивы в PowerShell имеют фиксированный размер (для наших целей), поэтому нам нужно использовать длинный [System.Collections.Generic.list] type in order to get access to the $s функция, которая делает именно то, что написано на банке.

Я пожертвовал 10 байтами, чтобы включить два $a statements to make the output pretty. OP has stated that outputting a list of chars is fine, so I could output just $x скорее, чем $s , but that's really ugly in my opinion.

Сэкономлено 10 байт благодаря briantist.

Питон 2, 50 байт

• Принимает строку и список индексов

Попробуйте онлайн!

С (ГКК), 99 байт

Попробуйте онлайн!

Принимает строку, массив и длину массива.

05AB1E, 9 7 байт

Попробуйте онлайн!

-2 благодаря идее от @ETHProductions.

сетчатка, 58 байт

Попробуйте онлайн! Объяснение:

Сопоставьте индексы (которые никогда не находятся в первой строке, поэтому им всегда предшествует новая строка).

Увеличьте индексы двойным интервалом, преобразуйте их в унарные и добавьте 1 (потому что нули в Retina сложны).

Повторно измените первое совпадение, которое всегда является текущим значением строки.

Получить следующий индекс в S .

Захватите строку, включая function(S,X,g=substring)Reduce(function(s,i)paste0(g(s,0,i-1),g(s,i+1)),X,S,,T) th character and one newline.

Отдельно захватите префикс и суффикс S th character of the string.

Сопоставьте индекс.

Замените строку самой собой, а индекс префиксом и суффиксом [ th character.

Пиф, 8 байт

Демонстрация

Сократите функцию удаления, начиная со строки и перебирая список индексов.

PowerShell, 54 58 байт

Попробуйте онлайн!

Объяснение

Принимает входные данные в виде массива символов ( X ).

Перебирает массив индексов ( function(S,X)Reduce(`[`,-X,S,,T) ) plus an injected first element of (s=#;For[t=1,t<=Length@#2,Print@s;s=StringDrop[s,{#2[[t]]+1}];t++];s)& , затем для каждого присваивает текущий элемент v # For each index: = # Print without popping ā # Push range(1, len(a) + 1) 0m # Raise each to the power of 0. # This gives a list of equal length containing all 1s 0yǝ # Put a 0 at the location that we want to remove Ï # Keep only the characters that correspond to a 1 in the new list }, # Print the last step , initializes v=ā0m0yǝÏ}, к l->s->{System.out.println(s);for(int i:l)System.out.println(s.delete(i,i+1));} , then iterates through the array of characters ( StringBuffer ), возвращая новый массив только из тех символов, индекс которых ( StringBuilder ) does not equal ( int[] ) текущий индекс для исключения ( a,b=input();print a for i in b:a.pop(i);print a ). This new array is assigned back to s,i=input() for i in i+[0]:print s;s.pop(i) , одновременно возвращаясь (это происходит, когда присваивание выполняется в круглых скобках). Этот возвращенный результат G§+oh↑↓ G Scan from left by function: Arguments are string, say s = "abcde", and index, say i = 3. ↓ Drop i elements: "de" ↑ Take i elements oh and drop the last one: "ab" §+ Concatenate: "abde" Implicitly print list of strings on separate lines. ed to form a string which is sent out to the pipeline.

Инъекция G§+oh↑↓ at the beginning ensures that the original string will be printed, since it's the first element and an index will never match " .

Перл 5, 55 байт (54 + " uQ åjV UuQ Push a quotation mark to the beginning of U. å Cumulatively reduce by j removing the item at that index in the previous value, V with an initial value of V. ")

Попробуйте онлайн!

МАТЛ, 8 байт

Индексация начинается с 1.

Попробуйте онлайн! Или проверить тестовые примеры.

Объяснение

С# (.NET Core), 87 87 74 70 байт

Попробуйте онлайн!

Просто показывает, что рекурсия не всегда является лучшим решением. На самом деле это короче моего первоначального недействительного ответа. По-прежнему печатает в STDOUT, а не возвращает, что необходимо, поскольку заканчивается ошибкой.

-4 байта благодаря TheLethalCoder

Дж, 23 байта

Попробуйте онлайн!

Виксал splice , 4 bytes

Попробуйте онлайн!

Печатает списки символов

Пиф, 10 байт

Изменения правил сэкономили мне 1 байт:

Попробуйте онлайн!

Пиф, 11 байт

Попробуйте онлайн!

Гайя, 9 байт

^{Мне действительно следует добавить функцию «удалить по индексу»...}

Попробуйте онлайн!

Объяснение

В, 12 байт

Попробуйте онлайн!

Это 1-индексированный, ввод такой:

Объяснение

Свифт 3, 80 байт

Попробуйте онлайн!

Пиф, 8 байт

Тестовый набор!

объяснение

Питон 2, 54

Попробуйте онлайн