17

In Excel, le colonne vanno da A-Z, AA,AB,AZ,BA,..,BZe così via. Ognuno corrisponde a numeri, ma piuttosto sono codificati come stringhe dell'alfabeto.

In questa sfida, ti verrà data una stringa di alfabeti e dovrai calcolare la colonna a cui corrisponde.

Alcuni test:

'A' restituisce 1 (significa che è la prima colonna)

'B' restituisce 2

'Z' restituisce 26

'AA' restituisce 27

'AB' restituisce 28

'AZ' restituisce 52

'ZZ' restituisce 702

'AAA' restituisce 703

Puoi presumere che le lettere maiuscole saranno fornite solo.

Vincono i byte più brevi.

In bocca al lupo!

code-golf math

— K Dividi X
fonte

Quindi ... base 26 con l'alfabeto?

— Jo King,

1

Non è abbastanza base 26 perché non c'è zero.

— J.Doe,

@ J.Doe Ah, immagino tu abbia ragione. Non me ne sono accorto poiché la mia soluzione ha automaticamente considerato Zcomunque 10

— Jo King,

Sfida inversa .

— user202729

6

@JoKing Base biiettiva .

— user202729

9

Perl 6 , 17 byte

{:26[.ords X-64]}

Provalo online!

Blocco di codice anonimo che sottrae 64 da ciascun valore di byte e converte dalla base 26 con Zoverflow alla colonna successiva.

— Jo King
fonte

7

Fogli Google, 21 byte

(la formula viene valutata in base al risultato, accetta input dalla cella A1)

=column(indirect(A1&2

— user202729
fonte

Sto per pubblicare una versione leggermente meno giocata di questo.

— ATaco,

1

Ho anche una soluzione in Fogli Google che non si basa sulla COLONNA incorporata, dai un'occhiata. (Inoltre, mi sento male che la soluzione su cui mi dedico maggiormente attiri meno attenzione ... è comunque un problema tipico con il voto, specialmente quando la sfida è su HNQ.)

— user202729

6

R , 48 43 byte

-5 byte grazie a @Giuseppe, usando la stessa logica, ma come un programma che elimina la ncharchiamata.

for(i in utf8ToInt(scan(,"")))F=F*26+i-64;F

Provalo online!

— J.Doe
fonte

4

Java (JDK) , 39 byte

s->s.chars().reduce(0,(a,b)->a*26+b%32)

Provalo online!

— Olivier Grégoire
fonte

Quale piattaforma Java supporta questo?

— Syed Hamza Hassan,

@SyedHamzaHassan Java 8 o più.

— Olivier Grégoire,

3

Python 2 , 52 45 byte

t=0
for c in input():t=26*t+ord(c)%64
print t

Provalo online!

— Chas Brown
fonte

3

05AB1E , 6 byte

Çžx-₂β

Provalo online!

— Okx
fonte

Per curiosità, perché usare žxinvece di solo 64?

— Kevin Cruijssen,

Non lo so, sembrava più bello, immagino?

— Okx,

3

Haskell , 38 34 31 byte

foldl(\o->(o*26-64+).fromEnum)0

Provalo online!

— OVS
fonte

3

PHP, 41 38 byte

-3 grazie a Jo King.

for($c=A;$c!=$argn;$i++)$c++;echo$i+1;

correre come tubo con -nr

uscita unaria, 34 byte:

1<?for($c=A;$c!=$argn;$c++)echo 1;

richiede PHP 7.1. salva su file, esegui come pipe con -nF.

— Titus
fonte

Sì, si può fare: sandbox.onlinephpfunctions.com/code/…

— Ismael Miguel,

@Rogem check codegolf.meta.stackexchange.com/questions/2424/…

— Titus

@Titus Va bene allora

2

Gelatina , 7 byte

ØAiⱮḅ26

Provalo online!

— Erik the Outgolfer
fonte

2

APL (NARS), 11 caratteri, 22 byte

{+/26⊥⎕A⍳⍵}

test

  f←{+/26⊥⎕A⍳⍵} 
  f¨'A' 'AA' 'AAA'
1 27 703 
  f¨'AB' 'ZZ' 'Z'
28 702 26

— RosLuP
fonte

2

C (gcc) , 46 , 43 byte

a;f(int*s){for(a=0;*s;)a=*s++%64+a*26;s=a;}

Provalo online!

Degolf

a; f(int*s)
{  for(a=0;*s;) // Loop through s, which is a null-terminated string.
       a=*s++%64 + a*26; // Multiply accumulated value by 26, and add current char modulo 64 to it.
   s=a;} // Return the accumulated value.

1

JavaScript (Node.js) , 48 byte

f=([h,...t],p=0)=>h?f(t,p*26+parseInt(h,36)-9):p

Provalo online!

— tsh
fonte

1

.map()è più corto di 1 byte . L'uso Buffer() salva un altro byte .

— Arnauld,

38 byte , espandendosi sui suggerimenti di @Arnauld.

— Shaggy,

1

Fogli Google, 100 byte

(la formula viene valutata in base al risultato, accetta input dalla cella A1)

=sum(arrayformula(
  (
    code(
      mid(A1,row(indirect("1:"&len(A1))),1)
    )-64
  )*26^row(indirect("1:"&len(A1)))/26

Tutti gli spazi vengono aggiunti solo per chiarezza.

Nota .

Non so se è possibile rimuovere la duplicazione di row(indirect("1:"&len(A1)).
Sebbene Google Sheets abbia una decimalfunzione, la traslitterazione richiederebbe molti byte.

— user202729
fonte

1

APL + WIN, 12 byte

Origine indice 1.

26⊥¯65+⎕av⍳⎕

Provalo online! Per gentile concessione di Dyalog Classic

Spiegazione:

⎕av⍳⎕ Prompts for input and gets Ascii integer value for each character

¯65+ subtracts 65 to give integers 1-26 for A-Z

26⊥ converts resulting vector from base 26 to single integer

— Graham
fonte

1

Java (JDK) , 92 byte

static int m(String v){int x=0;for(int i=0;i<v.length();i++)x=x*26+v.charAt(i)-64;return x;}

Provalo online!

Produzione

A = 1

B = 2

Z = 26

AA = 27

AB = 28

AZ = 52

ZZ = 702

AAA = 703

— Syed Hamza Hassan
fonte

Non sono un esperto del golf di Java, ma puoi giocare a golf considerevolmente ritornando invece di stampare, semplificando i cicli for, rimuovendo gli spazi bianchi e liberandoti delle variabili pe n. 92 byte! .

— Jo King,

Meraviglioso .......

— Syed Hamza Hassan,

1

È possibile rimuovere staticper ottenere 7 byte. Puoi anche rendere questa funzione una lambda per risparmiare più byte. Penso anche che la versione ricorsiva potrebbe salvare byte. In ogni caso, ecco la mia soluzione da 39 byte .

— Olivier Grégoire,

È magnifico.

— Syed Hamza Hassan,

1

MATL , 11 byte

0w"26*@+64-

Provalo online!

— Giuseppe
fonte

1

Kotlin , 36 byte

{it.fold(0){o,n->o*26+n.toInt()-64}}

Provalo online!

— OVS
fonte

1

Rubino , 18 byte

->s{[*?A..s].size}

Provalo online!

— GB
fonte

1

J , 11 byte

26#.64|3&u:

Provalo online!

Come funziona

26#.64|3&u:  Monadic verb. Input: a string.
       3&u:  Convert each character to Unicode codepoint
    64|      Modulo 64; maps A -> 1, ... Z -> 26
26#.         Interpret as base-26 digits and convert to single integer

— bubbler
fonte

1

Japt `-h`, 10 byte

åÈ*26+InYc

Provalo

O senza una bandiera. Il primo byte può essere rimosso se possiamo prendere l'input come una matrice di caratteri.

¬®c aIÃì26

Provalo

Spiegazione

åÈ             :Cumulatively reduce by passing each character at Y through a function, with an initial total of 0
  *26          :  Multiply current total by 26
     -I        :  Subtract 64
       n       :   Subtracted from
        Yc     :    The codepoint of Y
               :Implicitly output the last element of the resulting array

— ispido
fonte

0

Rubino `-nl` , 39 byte

p$_.chars.reduce(0){|x,y|26*x+y.ord-64}

Provalo online!

— Kirill L.
fonte

0

APL (Dyalog Classic) , 11 byte

⎕A∘⍳⊥⍨26⍴⍨≢

Provalo online!

— Galen Ivanov
fonte

0

J , 20 byte

[:(#.~26$~#)32|a.i.]

Provalo online!

Spiegazione:

 [:(#.~26$~#)32|a.i.] 
                  i.    - indices 
                    ]   - of the characters of the input
                a.      - in the alphabet
             32|        - mod 32
 [:(        )           - apply the following code to the above
         $~             - create a list of (left and right arguments exchanged) 
       26               - the number 26
           #            - repeated the length of the input times
    #.~                 - to base (26)

— Galen Ivanov
fonte

0

Carbone , 10 byte

Ｉ↨²⁶ＥＳ⊕⌕αι

Provalo online! Il collegamento è alla versione dettagliata del codice. Spiegazione:

     Ｓ      Input string
    Ｅ       Map over characters
         ι  Current character
        α   Uppercase alphabet
       ⌕    Find index
      ⊕     Increment
  ²⁶        Literal 26
 ↨          Base conversion
Ｉ           Cast to string
            Implicitly print

— Neil
fonte

0

Avanti , 22 byte

>jvi'@-\26l
^~>O@ ~+*<

Provalo online!

— lumaca_
fonte

0

MBASIC , 84 byte

1 INPUT S$:L=LEN(S$):FOR I=1 TO L:V=ASC(MID$(S$,I,1))-64:T=T+26^(L-I)*V:NEXT:PRINT T

Produzione:

? AZ
 52

? ZZ
 702

? AAA
 703

— wooshinyobject
fonte

0

codice macchina x86, 19 byte

00000000: 31c0 8b19 83e3 3f41 b21a f7e2 01d8 3831  1.....?A......81
00000010: 75f0 c3                                  u..

Montaggio:

section .text
	global func
func:				;this function uses fastcall conventions
	xor eax, eax		;reset eax to 0
	loop:
		;ebx=*ecx%64
		mov ebx, [ecx]	;ecx is 1st arg to this func (in fastcall conventions)
		and ebx, 63	;because 64 is a pwr of 2,n%64=n&(64-1)

		;ecx++		get next char in str by incrementing ptr
		inc ecx
		
		;eax=eax*26
		mov dl, 26	;using an 8bit reg is less bytes
		mul edx
		
		;eax+=ebx //(eax=(*ecx%64)+(eax*26))
		add eax, ebx

		;if(*ecx!='\0')goto loop
		cmp byte [ecx], dh ;dh==0
		jne loop
	ret			;return value is in eax

Provalo online!

— Logern
fonte

0

Kotlin , 29 byte

{it.fold(0){a,v->v-'@'+a*26}}

Provalo online!

spiegato

val column: (String) -> Int = {  // String in, Int out
    it.fold(0) { a, v ->  // acc, value
        v - '@'  // distance of char from @ (A=1 etc.)
                + a * 26
    }
}

— lumaca_
fonte

Data una stringa, calcola il numero della colonna a cui corrisponde

Perl 6 , 17 byte

Fogli Google, 21 byte

R , 48 43 byte

Java (JDK) , 39 byte

Python 2 , 52 45 byte

05AB1E , 6 byte

Haskell , 38 34 31 byte

PHP, 41 38 byte

Gelatina , 7 byte

APL (NARS), 11 caratteri, 22 byte

C (gcc) , 46 , 43 byte

Degolf

JavaScript (Node.js) , 48 byte

Fogli Google, 100 byte

APL + WIN, 12 byte

Java (JDK) , 92 byte

MATL , 11 byte

Kotlin , 36 byte

Rubino , 18 byte

J , 11 byte

Come funziona

Japt -h, 10 byte

Spiegazione

Rubino -nl , 39 byte

APL (Dyalog Classic) , 11 byte

J , 20 byte

Spiegazione:

Carbone , 10 byte

Avanti , 22 byte

MBASIC , 84 byte

codice macchina x86, 19 byte

Kotlin , 29 byte

spiegato

Japt `-h`, 10 byte

Rubino `-nl` , 39 byte