17

Trong Excel, các cột có phạm vi từ A-Z, AA,AB,AZ,BA,..,BZv.v. Họ thực sự từng đứng cho số, nhưng thay vào đó được mã hóa dưới dạng chuỗi bảng chữ cái.

Trong thử thách này, bạn sẽ được cung cấp một chuỗi các bảng chữ cái và bạn phải tính toán cột tương ứng.

Một số xét nghiệm:

'A' trả về 1 (có nghĩa là đó là cột đầu tiên)

'B' trả về 2

'Z' trả về 26

'AA' trả lại 27

'AB' trả về 28

'AZ' trả lại 52

'ZZ' trả về 702

'AAA' trả lại 703

Bạn có thể giả định rằng chữ in hoa sẽ chỉ được đưa ra.

Các byte ngắn nhất giành chiến thắng.

Chúc may mắn!

code-golf math

— K chia X
nguồn

Vậy ... cơ sở 26 với bảng chữ cái?

— Jo King

1

Nó không hoàn toàn là cơ sở 26 vì không có số không.

— J.Doe

@ J.Doe Ah, tôi đoán bạn đúng. Tôi đã không nhận thấy vì giải pháp của tôi tự động được coi Zlà 10 dù sao

— Jo King

Thử thách ngược .

— dùng202729

6

@JoKing cơ sở sinh học .

— dùng202729

9

Perl 6 , 17 byte

{:26[.ords X-64]}

Hãy thử trực tuyến!

Khối mã ẩn danh trừ 64 từ mỗi giá trị byte và chuyển đổi từ cơ sở 26 với Ztràn sang cột tiếp theo.

— Jo vua
nguồn

7

Google Sheets, 21 byte

(công thức ước tính cho kết quả, lấy đầu vào từ ô A1)

=column(indirect(A1&2

— người dùng202729
nguồn

Chỉ cần đăng một phiên bản ít chơi golf này.

— ATaco

1

Tôi cũng có một giải pháp trong Google Sheets không dựa vào COLUMN dựng sẵn, hãy kiểm tra nó. (bên cạnh đó, tôi cảm thấy tồi tệ vì giải pháp mà tôi đã nỗ lực nhiều hơn để ít bị chú ý hơn ... dù sao đó cũng là một vấn đề điển hình với việc bỏ phiếu, đặc biệt là khi thử thách diễn ra ở HNQ.)

— user202729

6

R , 48 43 byte

-5 byte nhờ @Giuseppe, sử dụng cùng logic, nhưng là một chương trình loại bỏ ncharcuộc gọi.

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

Hãy thử trực tuyến!

— J.Doe
nguồn

4

Java (JDK) , 39 byte

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

Hãy thử trực tuyến!

— Olivier Grégoire
nguồn

Nền tảng java nào hỗ trợ điều này?

— Syed Hamza Hassan

@Syed HamzaHassan Java 8 trở lên.

— Olivier Grégoire

3

Python 2 , 52 45 byte

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

Hãy thử trực tuyến!

— Chas Brown
nguồn

3

05AB1E , 6 byte

Çžx-₂β

Hãy thử trực tuyến!

— Ok
nguồn

Vì tò mò, tại sao sử dụng žxthay vì chỉ 64?

— Kevin Cruijssen

Tôi không biết, nó trông đẹp hơn tôi đoán?

— Okx

3

Haskell , 38 34 31 byte

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

Hãy thử trực tuyến!

— lò nướng
nguồn

3

PHP, 41 38 byte

-3 cảm ơn Jo King.

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

chạy như ống với -nr

đầu ra đơn nguyên, 34 byte:

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

yêu cầu PHP 7.1. lưu vào tập tin, chạy như đường ống với -nF.

— Tít
nguồn

@JoKing Có, nó có thể được thực hiện: sandbox.onlinephpfifts.com/code/iêu

— Ismael Miguel

@Rogem kiểm tra codegolf.meta.stackexchange.com/questions/2424/ory

— Titus

@Titus Được rồi

2

Thạch , 7 byte

ØAiⱮḅ26

Hãy thử trực tuyến!

— Erik là người vượt trội
nguồn

2

APL (NARS), 11 ký tự, 22 byte

{+/26⊥⎕A⍳⍵}

kiểm tra

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

— RosLuP
nguồn

2

C (gcc) , 46 , 43 byte

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

Hãy thử trực tuyến!

Thuốc khử trùng

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

Hãy thử trực tuyến!

— tsh
nguồn

1

.map()là 1 byte ngắn hơn . Sử dụng Buffer() tiết kiệm một byte khác .

— Arnauld

38 byte , mở rộng dựa trên đề xuất của @ Arnauld.

— Xù xì

1

Google Sheets, 100 byte

(công thức ước tính cho kết quả, lấy đầu vào từ ô A1)

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

Tất cả các không gian được thêm vào cho rõ ràng.

Lưu ý .

Tôi không biết nếu có thể loại bỏ sự trùng lặp row(indirect("1:"&len(A1)).
Mặc dù Google Sheets có decimalchức năng, việc chuyển ngữ sẽ mất rất nhiều byte.

— người dùng202729
nguồn

1

APL + THẮNG, 12 byte

Chỉ số gốc 1.

26⊥¯65+⎕av⍳⎕

Hãy thử trực tuyến! Lịch sự của Dyalog Classic

Giải trình:

⎕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
nguồn

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;}

Hãy thử trực tuyến!

Đầu ra

A = 1

B = 2

Z = 26

Aa = 27

AB = 28

AZ = 52

ZZ = 702

AAA = 703

— Syed Hamza Hassan
nguồn

Tôi không phải là một chuyên gia về chơi golf Java, nhưng bạn có thể đánh golf xuống đáng kể bằng cách quay lại thay vì in, đơn giản hóa các vòng lặp, loại bỏ khoảng trắng và loại bỏ các biến pvà nbiến. 92 byte! .

— Jo King

Tuyệt vời .......

— Syed Hamza Hassan

1

Bạn có thể loại bỏ staticđể đạt được 7 byte. Bạn cũng có thể làm cho hàm này trở thành lambda để dự phòng nhiều byte hơn. Tôi cũng nghĩ rằng phiên bản đệ quy có thể tiết kiệm byte. Trong mọi trường hợp, đây là giải pháp 39 byte của tôi .

— Olivier Grégoire

Điều đó thật tuyệt vời.

— Syed Hamza Hassan

1

MATL , 11 byte

0w"26*@+64-

Hãy thử trực tuyến!

— Giuseppe
nguồn

1

Kotlin , 36 byte

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

Hãy thử trực tuyến!

— lò nướng
nguồn

1

Ruby , 18 byte

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

Hãy thử trực tuyến!

— GB
nguồn

1

J , 11 byte

26#.64|3&u:

Hãy thử trực tuyến!

Làm thế nào nó hoạt động

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

— Bong bóng
nguồn

1

Japt `-h`, 10 byte

åÈ*26+InYc

Thử nó

Hoặc không có cờ. Byte đầu tiên có thể được loại bỏ nếu chúng ta có thể lấy đầu vào là một mảng ký tự.

¬®c aIÃì26

Thử nó

Giải trình

åÈ             :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

— Xù xì
nguồn

0

Ruby `-nl` , 39 byte

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

Hãy thử trực tuyến!

— Kirill L
nguồn

0

APL (Dyalog Classic) , 11 byte

⎕A∘⍳⊥⍨26⍴⍨≢

Hãy thử trực tuyến!

— Galen Ivanov
nguồn

0

J , 20 byte

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

Hãy thử trực tuyến!

Giải trình:

 [:(#.~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
nguồn

0

Than , 10 byte

Ｉ↨²⁶ＥＳ⊕⌕αι

Hãy thử trực tuyến! Liên kết là phiên bản dài dòng của mã. Giải trình:

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

— Neil
nguồn

0

Trước , 22 byte

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

Hãy thử trực tuyến!

— ốc sên_
nguồn

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

Đầu ra:

? AZ
 52

? ZZ
 702

? AAA
 703

— wooshinyobject
nguồn

0

mã máy x86, 19 byte

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

Hội,, tổ hợp:

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

Hãy thử trực tuyến!

— Hậu cần
nguồn

0

Kotlin , 29 byte

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

Hãy thử trực tuyến!

Giải thích

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
    }
}

— ốc sên_
nguồn

Cho một chuỗi, tính số cột tương ứng với

Perl 6 , 17 byte

Google Sheets, 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

Thạch , 7 byte

APL (NARS), 11 ký tự, 22 byte

C (gcc) , 46 , 43 byte

Thuốc khử trùng

JavaScript (Node.js) , 48 byte

Google Sheets, 100 byte

APL + THẮNG, 12 byte

Java (JDK) , 92 byte

MATL , 11 byte

Kotlin , 36 byte

Ruby , 18 byte

J , 11 byte

Làm thế nào nó hoạt động

Japt -h, 10 byte

Giải trình

Ruby -nl , 39 byte

APL (Dyalog Classic) , 11 byte

J , 20 byte

Giải trình:

Than , 10 byte

Trước , 22 byte

MBASIC , 84 byte

mã máy x86, 19 byte

Kotlin , 29 byte

Giải thích

Japt `-h`, 10 byte

Ruby `-nl` , 39 byte