Sistema di classificazione strano

14

Weirdo Incorporates ha uno strano modo di classificare il proprio personale in base al numero di giorni in cui erano presenti in ufficio:

  0 -  13 : F  
 14 - 170 : E
171 - 180 : D
181 - 294 : C
295 - 300 : B
301 - 365 : A

Note: The range is inclusive (i.e. 0-13 means 0 days and 13 days both will evaluate
as grade 'F').

Obbiettivo:

Scrivere un programma / funzione che emetta / restituisca il grado di un dipendente per il numero di giorni [entro un intervallo compreso tra 0 e 365] cui il dipendente ha partecipato.

Regole:

  • Puoi prendere l'input come una stringa o un numero ma devi emetterlo come una stringa / alfabeto (puoi scegliere tra lettere minuscole o maiuscole).
  • Si applicano scappatoie standard.
  • Questo è code-golf , quindi vince il programma più breve in byte!

Casi test:

12  => F
15  => E
301 => A
181 => C

Pagelle:

Mostra snippet di codice

code-golf  number  decision-problem  classification 
— officialaimm
fonte
— officialaimm,
1
— Mr. Xcoder
4
— H.Piz
1
@ Mr.Xcoder Ricordo che è stato discusso nella sandbox che non è un problema di questo dato che questo non ha intervalli di uguali dimensioni e che ha suffissi come +/ -.
— Erik the Outgolfer,
1
Possiamo ottenere un quadro di valutazione?
— jrtapsell,

Risposte:

4

Gelatina ,  18 17 15  14 byte

NịØAx“A©r½ɗÇ‘¤

Un collegamento monadico che prende un numero e restituisce un personaggio.

Provalo online! oppure vedi tutte le coppie input-output .

Come?

NịØAx“A©r½ɗÇ‘¤ - Link: number, d
N              - negate d
             ¤ - nilad followed by link(s) as a nilad:
  ØA           -   uppercase alphabet yield = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
     “A©r½ɗÇ‘  -   code-page indices = [65,6,114,10,157,14]
    x          -   times = 'A'x65+'B'*6+'C'x114+'D'x10+'E'*157+'F'*14
 ị             - index into (1-indexed & modular - hence the negation to allow all Fs
                                                   to be together at one end)
— Jonathan Allan
fonte
12

Javascript (ES6), 51 byte

n=>"ABCDEF"[(n<14)+(n<171)+(n<181)+(n<295)+(n<301)]

Soluzioni alternative (più lunghe):

53 52 byte (-1 byte grazie a @Arnauld)

n=>"FEDCBA"[n>300?5:n>294?4:n>180?3:n>170?2:+(n>13)]

55 53 byte (-2 byte grazie a @Neil)

n=>"AFEDCB"[[14,171,181,295,301].findIndex(m=>n<m)+1]

55 byte

n=>"FEDCBA"[[13,170,180,294,300].filter(m=>n>m).length]

Esempio di frammento di codice:

f=
n=>"ABCDEF"[(n<14)+(n<171)+(n<181)+(n<295)+(n<301)]
console.log(f(12))
console.log(f(15))
console.log(f(301))
console.log(f(181))
Espandi frammento

— Herman L
fonte
1
Che riassumere le condizioni è fantastico !!! Vorrei poter votare ancora una volta !!! : D
— officialaimm,
Posso salvare due byte su una delle tue soluzioni alternative:n=>"AFEDCB"[[14,171,181,295,301].findIndex(m=>n<m)+1]
— Neil
-1 byte per la tua prima soluzione alternativa:n=>'FEDCBA'[n>300?5:n>294?4:n>180?3:n>170?2:+(n>13)]
— Arnauld
7

TI-Basic, 40 byte

sub("FEDCBA",sum(Ans≥{0,14,171,181,295,301}),1
— Timtech
fonte
6

J , 31 byte

'FEDCBA'{~13 170 180 294 300&I.

Provalo online!

Spiegazione

'FEDCBA'{~13 170 180 294 300&I.  Input: n
          13 170 180 294 300     Constant array [13, 170, 180, 294, 300]
                            &I.  Use it with interval index to find which of
                                 the intervals (-∞, 13], (13, 170], (170, 180],
                                 (180, 294], (294, 300], (300, ∞) n can be inserted at
        {~                       Index into
'FEDCBA'                         This string and return that char
— miglia
fonte
La prima volta che ho visto diadico I.in natura. Neat.
— Cole
@cole Credo di averlo usato un paio di volte in passato nel code-golf.
— miglia,
6

Python 3 , 50 byte

Grazie a @jferard per -4 byte.

lambda n:chr(70-sum(n>ord(x)for x in"\rª´ĦĬ"))

Provalo online!

Python 3 , 54 byte

lambda n:chr(70-sum(n>x for x in[13,170,180,294,300]))

Provalo online!

Salvato 2 byte grazie a @mathmandan e indirettamente grazie a @JonathanFrech.

Python 2 , 56 byte

lambda n:"ABCDEF"[sum(n<x for x in[14,171,181,295,301])]

Provalo online!

— Mr. Xcoder
fonte
1
54 byte: lambda n:chr(70-sum(n>x for x in[13,170,180,294,300])). (Vedi risposta di @Jonathan Frech a codegolf.stackexchange.com/a/142244/36885 )
— mathmandan,
1
— jferard,
porto rubino: ->n{(70-"ĬĦ´ª\r".chars.count{|i|n>i.ord}).chr}stesse dimensioni
— Asone Tuhid,
4

C, 62 61 byte

Grazie a @Jonathan Frech per aver salvato un byte!

f(n){putchar(70-(n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5));}

Provalo online!

C, 57 byte

#define f(n)70-(n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5)

Provalo online!

C (gcc), 54 byte

f(n){n=70-(n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5);}

Provalo online!

C (gcc), 50 byte

Utilizzando la soluzione di @Herman Lauenstein .

f(n){n=65+(n<14)+(n<171)+(n<181)+(n<295)+(n<301);}

Provalo online!

— Steadybox
fonte
— Jonathan Frech,
Perché non inviare la versione più breve come soluzione principale?
— Shaggy,
@Shaggy Quelli che richiedono gcc ricorrono a comportamenti indefiniti, quindi preferirei mantenere quelli ben definiti in alto, e ordinarli dal più vecchio al più recente e allo stesso tempo dal più lungo al più breve mi sembra perfetto.
— Steadybox,
3

Kotlin , 56 byte

{v->'F'-listOf(13,170,180,294,300).filter{it<v}.count()}

Provalo online!

Abbellire

{ v->
    // Count the grades passed, then subtract that from F
    'F' - listOf(13,170,180,294,300)
            .filter { it < v }
            .count()
}

Test

var x:(Int)->Char =
{v->'F'-listOf(13,170,180,294,300).filter{it<v}.count()}

fun main(args: Array<String>) {
    println(x(12))
    println(x(15))
    println(x(301))
    println(x(181))
}
— jrtapsell
fonte
+1. Ho modificato la tua risposta in un formato più formale, spero che non ti dispiaccia.
— officialaimm,
Niente affatto, intendevo riparare il mio strumento per produrre l'intestazione giusta
— jrtapsell,
3

Japt , 23 21 byte

'Gc-[#ªT#´D294L*3]è<U

Provalo

explantion

Input implicito di numero intero U.

'Gc-

Sottrai dai punti di codice della stringa (carattere singolo) G...

è<U

Il conteggio degli elementi inferiore a U...

[#ªT#´D294L*3]

Nell'array di 170 ( #ª), 0 ( T), 180 ( #´), 13 ( D), 294 (letterale) e 300 ( L*3), così formattato e ordinato per evitare l'uso di virgole di delimitazione. 0potrebbe essere rimosso (sottraendo invece dal punto di codice di F), ma sarebbe quindi necessario aggiungere una virgola o C*F(12 * 15) utilizzare 180, alla fine senza salvare byte.

— ispido
fonte
3

R , 50 44 byte

LETTERS[6-sum(scan()>c(13,170,180,294,300))]

Provalo online!

come la risposta javascript, ma usa la vettorializzazione di R e le LETTERE incorporate per essere un po 'più brevi.

Grazie a rturnbull per la rasatura di quegli ultimi 6 byte.

— Giuseppe
fonte
— rturnbull
In effetti, 44 byte semplicemente trasformandolo in un programma completo anziché in una funzione.
— rturnbull
@rturnbull ah, stavo per dire "no, è necessario avvolgerlo catoppure utilizzare source(program,ec=T)e contare ec=Tcome flag (come da meta consenso sui programmi R), ma da un altro, più recente meta consenso non contiamo alcun flag più a lungo, quindi questa è una soluzione perfettamente valida.
— Giuseppe
2

Recursiva , 49 30 byte

Y(++++<a301<a295<a181<a171<a14

Provalo online!

Mi permetta di rispondere alla mia domanda nella mia lingua. : D

  • salvato 19 byte usando la tecnica dalla sorprendente risposta JS di @Herman Lauenstein

Spiegazione:

Y(++++<a301<a295<a181<a171<a14
      <a301<a295<a181<a171<a14 calculate true/false for all the conditions
  ++++                         sum up all the conditions to obtain n which can be either 0,1,2,3,4 or 5
 (                             yield upper-case Alphabet
Y                              Get n-th element
— officialaimm
fonte
2

Pyke , 28 byte

G6<13T17*180T30*294]5FhQ>)s@

Provalo qui!

Spiegazione

G6<13T17*180T30*294]5FhQ>)s@ - Full program. T is the constant for 10.

G                            - The lowercase alphabet.
 6<                          - With the letters after the index 6 trimmed.
   13                        - The literal 13.
     T17*                    - The integer 170, composed by 17 * 10, to save whitespace.
         180                 - The literal 180.
            T30*             - The integer 300, composed by 30 * 10. 
                294          - The literal 294.
                   ]5        - Create a list of 5 elements.
                     FhQ>)   - For each element in the list.
                      h      - Increment.
                       Q     - The input.
                        >    - Is smaller ^^ than ^? Yields 1 for truthy and 0 for falsy.
                         )s  - Close loop and sum.
                           @ - Get the index in the alphabet substring explained above.
— Mr. Xcoder
fonte
1

Pyth, 30 byte

@GtlfgTQmCdc"\r ª ´ & , m"d

Il sito non sembra mostrare il carattere con il punto 1 del codice, quindi è necessario inserire un carattere con il punto 1 del codice prima del &, ,e malla fine

(Sostituisci tutte le 1s con carattere con il punto codice 1):

@GtlfgTQmCdc"\r ª ´ 1& 1, 1m"d
— Karan Elangovan
fonte
1

Pyth , 25  26  byte

@<G6sgRQ[13*17T180*30T294

Verifica tutti i casi di test.

Spiegazione

@<G6sgRQ[13*17T180*30T294 - Full program.

  G                       - The lowercase alphabet.
 < 6                      - With the letters after the index 6 trimmed. We will call "S".
        [                 - Initialise a list literal.
         13               - The literal 13.
           *17T           - The integer 170, composed by 17 * 10, so save whitespace.
               180        - The literal 180.
                      294 - The literal 294.
                  *30T    - The integer 300, composed by 30 * 10.
     gRQ                  - For each element, return 1 if is is ≥ the input. 0 otherwise.
    s                     - Sum.
@                         - Get the index into S of ^.
                          - Output implicitly.
— Mr. Xcoder
fonte
1

Ly , 74 byte

n(14)L["F"o;]p(171)L["E"o;]p(181)L["D"o;]p(195)L["C"o;]p(301)L["B"o;]"A"o;

Provalo online!

Un semplice approccio if-chain. Dubito che possa essere reso molto più breve.

— LyricLy
fonte
Sono (...)necessarie quelle parantesi ? PS nvm, a quanto pare lo sono.
— officialaimm,
1

Java 8, 55 byte

n->n<14?'F':n<171?'E':n<181?'D':n<295?'C':n<301?'B':'A'

Provalo qui.

57 byte alternativi :

n->(char)(n<14?70:n<171?69:n<181?68:n<295?67:n<301?66:65)

Provalo qui.

60 byte alternativi :

n->"FEDCBA".charAt(n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5)

Provalo qui.

Forse si può trovare un qualche tipo di formula per ottenere 0-5 in un modo più breve rispetto n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5all'uso dell'ultimo approccio. Sto ancora indagando su questo.

— Kevin Cruijssen
fonte
1

PowerShell , 59 byte

(,'F'*14+,'E'*157+,'D'*10+,'C'*114+,'B'*6+,'A'*65)["$args"]

Provalo online!

Simile alla risposta di Jelly di Jonathan Allen, in quanto stiamo costruendo una matrice di tutte le lettere concatenate insieme, quindi indicizzandole in quella matrice con l'input $args.

— AdmBorkBork
fonte
1

Coniglio ~ , 50 byte

(Domanda non complicata, postdatate. Ho appena finito l'interprete (yay) e volevo provare a risolvere qualcosa. Questa è anche la mia prima cosa da golf in codice)

=>FEDCBA$<({.0-\_-^\-&^?n&&}_}\>\{{\>:.¤})Ð"ỤṅỌrḲA

Prende sostanzialmente le differenze da un grado al successivo 14.157,10.114,6,65 (codificato come ỤṅỌrḲA) e sottrae dall'input. Se viene trovato un numero negativo, smette di avanzare lungo la sequenza "FEDCBA" e genera la lettera.

Piccola spiegazione di questo bellissimo pezzo di sintassi

Rabbit ~ utilizza una memoria basata su griglia con uno o più punti di inserimento che puoi spostare; questa soluzione utilizza 2.

=>FEDCBA$<({.0-\_-^\-&^?n&&}_}\>\{{\>:.¤})Ð"ỤṅỌrḲA - Full program.

  FEDCBA                                           - Load bytes into grid
                                          Ð"ỤṅỌrḲA - Load bytes 14,157,10,114,6,65 into second line of data grid
=                                                  - Read input
 >       <      _ ^   ^     _  >   >               - Move caret (most instructions read from the grid below the active caret)
        $                                          - Create a new caret
          (                              )         - Loop
           {.0             } }   {{     }          - Conditional statement checking if value at caret == 0 then move active caret to next grade else print and quit
              -  -  -                              - Subtract 
               \   \          \ \                  - Cycle active caret
                     &   &&                        - Bitwise and to see if number is negative
                       ?n                          - Get negative sign bit
                                    :.             - Print value at caret as character
                                      ¤            - Terminate program
— Adamo
fonte
Bello. C'è un modo per provarlo online?
— officialaimm,
Non al momento ^^
— Adam,
1

Excel, 53 byte

Somma delle condizioni, quindi restituisce il carattere ASCII richiesto:

=CHAR((A1<14)+(A1<171)+(A1<181)+(A1<295)+(A1<301)+65)

Soluzioni alternative:

Condizioni di somma, indice stringa di ritorno (63 byte):

=MID("ABCDEF",(A1<14)+(A1<171)+(A1<181)+(A1<295)+(A1<301)+1,1)
— Wernisch
fonte
1

K (oK) , 30 byte

Soluzione:

"FEDCBA"@0 14 171 181 295 301'

Provalo online!

Spiegazione:

Indice nel bucket corretto:

"FEDCBA"@0 14 171 181 295 301' / the solution
         0 14 171 181 295 301' / bin (') input in a bucket
"FEDCBA"@                      / index (@) into "FEDCBA"
— streetster
fonte
1

Jotlin , 48 41 byte

{v->'F'-l(13,170,180,294,300).f{a<v}.l()}

Intero programma:

var x:(Int)->Char =
{v->'F'-l(13,170,180,294,300).f{a<v}.l()}

println(x(12))
println(x(15))
println(x(301))
println(x(181))

Ho portato qui la mia precedente risposta di Kotlin .

— jrtapsell
fonte
1

V , 37 34 byte

aFEDCBA5äh113äh9äh156äh13ähÀ|vyVp

Provalo online!

hexdump:

00000000: 3133 4146 1b31 3536 4145 1b39 4144 1b31  13AF.156AE.9AD.1
00000010: 3133 4143 1b35 4142 1b36 3441 411b eec0  13AC.5AB.64AA...
00000020: 7c76 7956 70                             |vyVp

Idea base:

  • Stampa FEDCBA, crea 5 copie di B, 113 copie di C ecc. FFFFFFFFFFFFFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDDDDDDDDDCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCBBBBBARisultanti nella stringa (esiste probabilmente un modo più efficiente per farlo)
  • Vai alla ncolonna ( nè il primo argomento), copia un singolo carattere e sostituisci l'intera stringa con esso.
— oktupol
fonte
1

Perl 6, 42 39 byte

{chr(65+[+] "\rª´ĦĬ".ords »>»$_)}
— bb94
fonte
1

Stax , 18 byte

5"«µħĭ",+|oH-VA@]

Esegui ed esegui il debug online!

Spiegazione

Byte conteggiati in CP437.

5"«µħĭ",+|oH-VA@]
5            -        5 minus the result of the following
 "«µħĭ"                   [14, 171, 181, 295, 301]
        ,+                Append input
          |oH             Index of last element if the array were to be sorted
              VA@]    Letter in the alphabet with the given index
— Weijun Zhou
fonte
0

C #, 110 byte

x=>{if(x<14)return"F";if(x<171)return"E";if(x<181)return"D";if(x<295)return"C";if(x<301)return"B";return"A";};

Provalo online

— snorepion
fonte
2
Puoi accorciare significativamente la tua lambda usando l'operatore trinario ?:comex<14?"F":x<170?"E":x<180?"D":x<294?"C":x<300?"B":"A"
— Bradley Uffner l'
Utilizzando il nostro sito, riconosci di aver letto e compreso le nostre Informativa sui cookie e Informativa sulla privacy.
Licensed under cc by-sa 3.0 with attribution required.