Deskripsi tantangan

Anda memiliki perpustakaan musik dengan banyak lagu yang direkam oleh banyak band-band, yang masing-masing memiliki nama, seperti Queen, Aerosmith, Sunny Day Real Estate, The Strokes. Ketika pemutar audio menampilkan pustaka menurut abjad menurut nama band, biasanya lompatan Thebagian itu, karena banyak nama band mulai dengan The, sehingga lebih mudah untuk menavigasi melalui koleksi media Anda. Dalam tantangan ini, diberi daftar (array) string, Anda perlu mengurutkannya seperti itu (yaitu, menghilangkan Thekata di awal nama). Anda dapat menulis metode atau program kerja penuh.

Input / output sampel

[Queen, Aerosmith, Sunny Day Real Estate, The Strokes] -> [Aerosmith, Queen, The Strokes, Sunny Day Real Estate]
[The Ramones, The Cure, The Pixies, The Roots, The Animals, Enrique Iglesias] -> [The Animals, The Cure, Enrique Iglesias, The Pixies, The Ramones, The Roots]
[The The, The They, Thermodynamics] -> [The The, Thermodynamics, The They]

Catatan / Tepi kasus

• Mengurutkan secara leksikografis tidak peka huruf besar-kecil, jadi The Police, The policedan the policesemuanya setara,

• Algoritme Anda hanya menghilangkan thekata pertama , sehingga band diberi nama The Theatau The The Banddiurutkan secara normal dengan kata kedua the,

• Band bernama The(kata tiga huruf) diurutkan secara normal (tanpa melewatkan),

• Urutan dua band dengan nama yang sama, yang salah satunya dimulai dengan the(seperti The Policedan Police) tidak ditentukan,

• Anda dapat mengasumsikan bahwa jika nama band terdiri dari lebih dari satu kata, mereka dipisahkan oleh karakter spasi tunggal. Anda tidak perlu menangani spasi putih depan atau belakang,

• Semua string input cocok [A-Za-z0-9 ]*, yaitu mereka hanya terdiri dari huruf kecil dan besar alfabet Inggris, digit dan karakter spasi,

• Ingat bahwa ini adalah tantangan kode-golf , jadi buat kode Anda sesingkat mungkin!

Python, 56 62 64 byte

lambda b:sorted(b,key=lambda x:(x,x[4:])[x.lower()[:4]=='the '])

Cobalah

Terima kasih kepada @Chris H untuk menunjukkan bahwa lstrip()tidak menangani The Thedengan benar, karena strip ini meledakkan semua karakter yang cocok dan mengurutkannya sebagai string kosong, dan @manatwork untuk menemukan kesalahan dalam menggunakan replace(). Versi baru akan berfungsi.

Versi lama:

lambda b:sorted(b,key=lambda x:x.lower().lstrip('the '))

V , 32 28 byte

ç^The /dwA_
:sort
ç_/$xIThe 

Cobalah online!

Catatan untuk diri sendiri: Buat singkatan untuk :sortjadi saya tidak perlu 6 byte penuh untuk satu perintah!

Penjelasan:

ç^The /     "On every line starting with 'The ',
       dw   "Delete a word
         A_ "And (A)ppend an underscore '_'

:sort       "Sort all lines alphabetically

ç_/         "On every line containing an underscore,
   $x       "Delete the last character
     IThe   "And prepened 'The '

Retina , 34 byte

Linefeed tambahan sangat penting.

%`^
$';
T`L`l`.+;
m`^the 

O`
.+;

I / O adalah satu band per baris.

Cobalah online!

Penjelasan

%`^
$';

Gandakan setiap baris, menggunakan ; sebagai pemisah.

T`L`l`.+;

Putar semuanya di depan a ; huruf kecil.

m`^the 

Hapus apa saja the yang muncul di awal baris.

O`

Urutkan garis.

.+;

Hapus awal garis yang kami gunakan untuk menyortir.

Pyke, 16 byte

.#l1D"the ".^4*>

Coba di sini!

.#                - sort_by(V, input)
  l1              -  i = i.lower()
      "the ".^    -   i.startswith("the ")
              I   -  if ^:
               4> -   i[4:]

Perl, 52 byte

-13 byte terima kasih kepada @manatwork
-1 byte terima kasih ke @ msh210

sub f{lc pop=~s/^the //ri}print sort{f($a)cmp f$b}<>

Satu pita per baris sebagai input, dan demikian juga output.

Implementasinya cukup lurus ke depan: program mencetak daftar band, diurutkan dengan bantuan fungsi kustom ( f) yang mengembalikan nama band huruf kecil tanpa akhirnya memimpin the.

Python, 66 72 69 byte

lambda x:sorted(x,key=lambda a:a[4*(a.lower()[:4]=='the '):].lower())

Gunakan sortedmetode Python dengan keyargumen kata kunci untuk mengurutkan berdasarkan nama minus "The". Ini adalah lambda; untuk menyebutnya, beri nama dengan meletakkan f=di depan.

Sekarang dengan sensitivitas kasus ekstra!

Ruby, 42 byte

->a{a.sort_by{|s|s.upcase.sub /^THE /,''}}

Cobalah online!

Perl 6 , 26 byte

*.sort({fc S:i/^'the '//})

Penjelasan:

# ｢*｣ is the input to this Whatever lambda
*.sort(

  # sort based on the return value of this Block lambda
  {
    fc # foldcase the following

    # string replace but not in-place
    S
      :ignorecase
      /
        # at the start of the string
        ^

        # match ｢the ｣
        'the '

      # replace with nothing
      //
  }
)

Uji:

use v6.c;
use Test;

my @tests = (
  « Queen Aerosmith 'Sunny Day Real Estate' 'The Strokes' »
    => « Aerosmith Queen 'The Strokes' 'Sunny Day Real Estate' »,
  « 'The Ramones' 'The Cure' 'The Pixies' 'The Roots' 'The Animals' 'Enrique Iglesias' »
    => « 'The Animals' 'The Cure' 'Enrique Iglesias' 'The Pixies' 'The Ramones' 'The Roots' »,
  « 'The The' 'The They' Thermodynamics »
    => « 'The The' Thermodynamics 'The They' »,
);

# give it a lexical name for clarity
my &band-sort = *.sort({fc S:i/^'the '//});

plan +@tests;

for @tests -> ( :key(@input), :value(@expected) ) {
  is-deeply band-sort(@input), @expected, @expected.perl;
}

1..3
ok 1 - ("Aerosmith", "Queen", "The Strokes", "Sunny Day Real Estate")
ok 2 - ("The Animals", "The Cure", "Enrique Iglesias", "The Pixies", "The Ramones", "The Roots")
ok 3 - ("The The", "Thermodynamics", "The They")

PowerShell v2 +, 33 32 29 byte

$args|sort{$_-replace'^the '}

Disimpan 3 byte berkat @MathiasRJessen

Input melalui argumen baris perintah. Urutkan nama asli berdasarkan hasil dari blok skrip {...}yang melakukan regex -replaceuntuk menghapus yang terkemuka (case-insensitive) "the ".

Contohnya

PS C:\Tools\Scripts\golfing> .\sort-band-names.ps1 'the Ramones' 'The cure' 'The Pixies' 'The Roots' 'the Animals' 'Enrique Iglesias'
the Animals
The cure
Enrique Iglesias
The Pixies
the Ramones
The Roots

PS C:\Tools\Scripts\golfing> .\sort-band-names.ps1 'The The' 'The They' 'Thermodynamics'
The The
Thermodynamics
The They

PS C:\Tools\Scripts\golfing> .\sort-band-names.ps1 'THE STOOGES' 'The Strokes' 'The The' 'the they' 'the band' 'STP'
the band
THE STOOGES
STP
The Strokes
The The
the they

JavaScript / ECMAScript 6 93 70 byte

70 Terima kasih kepada Neil dan Downgoat untuk nasihatnya

B=>B.sort((a,b)=>R(a).localeCompare(R(b)),R=s=>s.replace(/^the /i,''))

Versi yang Dapat Dibaca untuk varian 70-byte

let sortBandNames = (bandNames) => {
    let stripThe = (name) => name.replace(/^the /i, '');
    let compareFunc = (a, b) => stripThe(a).localeCompare(stripThe(b));
    return bandNames.sort(compareFunc)
};

93

f=B=>{R=s=>s.toLowerCase().replace(/the /,'');return B.sort((a,b)=>R(a).localeCompare(R(b)))}

Versi yang Dapat Dibaca untuk varian 93-byte

let sortBandNames = (bandNames) => {
    let stripThe = (name) => name.toLowerCase().replace(/the /, '');
    let compareFunc = (a, b) => stripThe(a).localeCompare(stripThe(b));
    return bandNames.sort(compareFunc)
};

Java 8, 178 byte

void q(String[]s){java.util.Arrays.sort(s,(a,b)->(a.toLowerCase().startsWith("the ")?a.substring(4):a).compareToIgnoreCase(b.toLowerCase().startsWith("the ")?b.substring(4):b));}

Versi tidak disatukan:

void sort(String[] bands) {
    java.util.Arrays.sort(bands, (a, b) -> 
        (a.toLowerCase().startsWith("the ") ? a.substring(4) : a).compareToIgnoreCase(
            b.toLowerCase().startsWith("the ") ? b.substring(4) : b
        )
    );
}

Sebut seperti itu:

public static void main(String[] args) {
    String[] bands = {"The Strokes", "Queen", "AC/DC", "The Band", "Cage the Elephant", "cage the elephant"};
    sort(bands); // or q(bands) in the golfed version
    System.out.println(java.util.Arrays.toString(bands));
}

Nim , 96 byte

import algorithm,strutils,future
x=>x.sortedByIt toLower it[4*int(it.toLower[0..3]=="the ")..^0]

^{Itu importmengambil banyak byte:|}

Terjemahan dari jawaban Python saya .

Ini adalah prosedur anonim; untuk menggunakannya, itu harus dilewatkan ke dalam prosedur pengujian. Inilah program lengkap yang dapat Anda gunakan untuk pengujian:

import algorithm,strutils,future
proc test(x: seq[string] -> seq[string]) =
 echo x(@["The The", "The They", "Thermodynamics"]) # Substitute your input here
test(x=>x.sortedByIt toLower it[4*int(it.toLower[0..3]=="the ")..^0])

Haskell, 84 byte

import Data.List
p(t:'h':'e':' ':s)|elem t"Tt"=s
p s=s
sortBy(\a b->p a`compare`p b)

Telepon dengan

sortBy(\a b->p a`compare`p b)["The The", "The They", "Thermodynamics"]

Kasus cobaan:

let s = sortBy(\a b->p a`compare`p b)
and[s["Queen", "Aerosmith", "Sunny Day Real Estate", "The Strokes"]==["Aerosmith", "Queen", "The Strokes", "Sunny Day Real Estate"],s["The Ramones", "The Cure", "The Pixies", "The Roots", "The Animals", "Enrique Iglesias"]==["The Animals", "The Cure", "Enrique Iglesias", "The Pixies", "The Ramones", "The Roots"],s["The The", "The They", "Thermodynamics"]==["The The", "Thermodynamics", "The They"]]

MATL , 16 byte

tk'^the '[]YX2$S

Format input adalah (setiap baris sesuai dengan kasus uji)

{'Queen', 'Aerosmith', 'Sunny Day Real Estate', 'The Strokes'} 
{'The Ramones', 'The Cure', 'The Pixies', 'The Roots', 'The Animals', 'Enrique Iglesias'}
{'The The', 'The They', 'Thermodynamics'}

Cobalah online!

Penjelasan

t        % Implicitly input cell array of strings. Push another copy
k        % Convert to lowercase
'^the '  % String to be used as regex pattern: matches initial 'the '
[]       % Empty array
YX       % Regex replacement: replace initial 'the ' in each string by empty array
2$S      % Sort input according to the modified cell array. Implicitly display

C #, 139 Bytes

using System.Linq;System.Collections.IEnumerable S(string[] l)=> l.OrderBy(b=>(b.ToLower().StartsWith("the ")?b.Substring(4):b).ToLower());

Coba online!

Tanpa menghitung usings, jawabannya adalah 102 byte.

BASH, 64 Bytes

sed 's/^the / /;s/^The /    /'|sort -fb|sed 's/^ /the /;s/^ /The /'

Input: stdin, satu band per baris. Output: stdout

Catatan: Penggantian kedua (s / ^ The / / dan s / ^ / The /) menggunakan karakter tab, jadi mereka tidak selalu menyalin / menempel dengan benar.

Bash + coreutils, 44 byte

sed '/^the /I!s,^,@ ,'|sort -dk2|sed s,@\ ,,

Penjelasan: format input dan output adalah satu pita per baris

sed '/^the /I!s,^,@ ,'   # prepend '@ ' to each line not starting with 'the ', case
                         #insensitive. This adds a temporary field needed by sort.
sort -dk2                # sort in ascending dictionary order by 2nd field onward
sed s,@\ ,,              # remove the temporary field

Uji coba (menggunakan dokumen di sini dengan EOF sebagai penanda akhir):

./sort_bands.sh << EOF
> Queen
> Aerosmith
> Sunny Day Real Estate
> The Strokes
> EOF

Keluaran:

Aerosmith
Queen
The Strokes
Sunny Day Real Estate

Vim, 18 byte

Nah sekarang saya menyadari ini mungkin, saya agak malu dengan jawaban 26 byte V saya, terutama karena V seharusnya lebih pendek dari vim. Tapi ini cukup builtin.

:sor i/\(The \)*/<CR>

Penjelasan (langsung dari bantuan vim):

                            *:sor* *:sort*
:[range]sor[t][!] [b][f][i][n][o][r][u][x] [/{pattern}/]
            Sort lines in [range].  When no range is given all
            lines are sorted.

            With [i] case is ignored.

            When /{pattern}/ is specified and there is no [r] flag
            the text matched with {pattern} is skipped, so that
            you sort on what comes after the match.
            Instead of the slash any non-letter can be used.

C, 216 212 135 + 5 ( qsort) = 221 217 140 byte

M(void*a,void*b){char*A,*B;A=*(char**)a;B=*(char**)b;A=strcasestr(A,"The ")?A+4:A;B=strcasestr(B,"The ")?B+4:B;return strcasecmp(A,B);}

Yah, aku akhirnya menyelesaikan ini C. Tips bermain golf sangat dihargai.

Dalam pengajuan ini, Madalah fungsi perbandingan yang harus disediakan qsort. Oleh karena itu, untuk mengaktifkan ini, Anda harus menggunakan qsortdalam format di qsort(argv++,argc--,8,M)mana argvberisi argumen baris perintah dan argcjumlah argumen yang disediakan.

Cobalah secara Online!

05AB1E, 27 bytes (non-competing)

vyð¡RD¤…TheQsgα£Rðý})‚øí{ø¤

Try it online!

Explanation

vyð¡RD¤…TheQsgα£Rðý})‚øí{ø¤   Argument l
v                 }           For each y in l, do:
 yð¡                            Split y on space
    RD                          Reverse and duplicate
      ¤…TheQ                    Last element equals "The" (true = 1, false = 0)
            sgα                 Absolute difference with length of array
               £                Get elements from index 0 to calculated difference
                R               Reverse
                 ðý             Join on space
                    )‚øí      Pair each element with original
                        {ø¤   Sort and get the original band name

Groovy, 34 bytes

{it.sort{it.toLowerCase()-'the '}}

41% my answer is .toLowerCase(), kill me now.

Output

When running...

({it.sort{it.toLowerCase()-'the '}})(['The ramones','The Cure','The Pixies','The Roots','The Animals','Enrique Iglesias'])

The result is...

[The Animals, The Cure, Enrique Iglesias, The Pixies, The ramones, The Roots]

With no debug or error output.

q/kdb+, 36 33 bytes

Solution:

{x(<)@[x;(&)x like"[Tt]he *";4_]}

Example:

q){x(<)@[x;(&)x like"[Tt]he *";4_]}("Queen";"Aerosmith";"Sunny Day Real Estate";"The Strokes";"the Eagles")
"Aerosmith"
"the Eagles"
"Queen"
"The Strokes"
"Sunny Day Real Estate"

Explanation:

Strip out any "[Tt]he " from each input string, sort this list, then sort the original list based on the indexing of the sorted list.

{x iasc @[x;where x like "[Tt]he *";4_]} / ungolfed solution
{                                      } / lambda function
        @[x;                       ;  ]  / apply function to x at indices
                                    4_   / 4 drop, remove first 4 items
            where x like "[Tt]he *"      / where the input matches 'The ...' or 'the ...'
   iasc                                  / returns sorted indices
 x                                       / index into original list at these indices

Japt, 11 10 bytes

ñ_v r`^e 

Try it

Java 176 158 bytes

public String[]sort(String[]names){
  for(int i=-1;++i<names.length;)
    if(names[i].startsWith("(The |the )"))
      names[i]=names[i].substring(4);
  return Arrays.sort(names,String.CASE_INSENSITIVE_ORDER);
  }

Main Function

public static void main(String[]args){
  Scanner s = new Scanner(System.in);
  List<String> list= new ArrayList<>();
  while(!(String h = s.nextLine).equalsIgnoreCase("~")){
    list.add(h);
  }
System.out.println(sort(list.toArray(newString[0]))

); }

Golfed sort function:

String[]s(String[]n){for(int i=-1;++i<n.length;)if(n[i].startsWith("(The |the )"))n[i]=n[i].substring(4);return Arrays.sort(n,String.CASE_INSENSITIVE_ORDER);}

Thanks to @raznagul for saving 18 bytes