Skip to main content
We’ve updated our Terms of Service. A new AI Addendum clarifies how Stack Overflow utilizes AI interactions.
Code Golf

Return to Revisions

7 of 7
typo in my name :-)
Robin Ryder
  • 15.8k
  • 2
  • 25
  • 71

R, (削除) 63 (削除ここまで) (削除) 62 (削除ここまで) 61 bytes

-16 bytes thanks to Giuseppe

-7 more bytes, again, thanks to Giuseppe

-1 byte adding a line break in place of \n

-1 byte thanks to Robin Ryder

for(l in utf8ToInt(scan(,""))-96)cat(letters[l:0],'
',sep="")

Try it online!

R, 86 bytes (my original answer)

x=utf8ToInt(scan(,''));s=sapply;cat(gsub(" .+"," ",s(s(x,`:`,97),intToUtf8)),sep="\n")

Ungolfed:

x=utf8ToInt(scan(,'')) #Takes input, converts to ASCII
s=sapply; #Alias sapply function to save a byte
 s(x,`:`,97) #Create vector from 97 to respective ASCII value
 s( ,intToUtf8) #Convert to character
 gsub(" .+"," ", ) #Removes everything after space
cat( ,sep="\n") #Outputs to console

Try it online!

Could likely be golfed.

NOTE: It does not use recursion. I do not know whether that would be shorter or not. I'll experiment later.

Sumner18
  • 1.9k
  • 10
  • 20

AltStyle によって変換されたページ (->オリジナル) /