9

Dato i codici colore in CMYK, convertilo in valore RGB.

Input:
stringa di 4 numeri interi (compresi tra 0 e 100) separati da spazio

86 86 0 43
28 14 0 6
0 41 73 4

Produzione:

#141592
#ABCDEF
#F49043

Vince il codice più corto!

SUGGERIMENTO: per convertire CMYK in RGB è possibile utilizzare una formula come:
Red   = 255 x (1 - Cyan/100)    x (1 - Black/100)   
Green = 255 x (1 - Magenta/100) x (1 - Black/100)   
Blue  = 255 x (1 - Yellow/100)  x (1 - Black/100)   
e usa queste tre variabili per ottenere il valore in #RRGGBBformato

code-golf conversion color

— Ero io
fonte

1

Possiamo prendere CMYKvalori come decimali da 0a 1o è necessario fare 0per 100?

— HyperNeutrino,

1

Inoltre, dovremmo inserire più codici CMYK contemporaneamente o solo uno e convertirlo?

— HyperNeutrino,

7

Possiamo prendere l'input come un elenco di numeri o deve essere una stringa delimitata?

— Business Cat,

7

L'input / output che hai fornito non corrisponde alla formula, anche come dovremmo gestire l'arrotondamento?

— Rod,

2

@Rod Non è ancora chiaro come debbano essere gestite le imprecisioni in virgola mobile.

— Erik the Outgolfer,

5

PHP , 90 byte

<?="#";for($c=explode(" ",$argn);$i<3;)printf("%02X",255*(1-$c[+$i++]/100)*(1-$c[3]/100));

Provalo online!

— Jörg Hülsermann
fonte

2

Python 3 , 100 98 byte

-2 byte grazie a Rod.

lambda s:'#'+''.join('%02X'%int(.0255*(100-int(i))*(100-int(s.split()[3])))for i in s.split()[:3])

Provalo online!

— totallyhuman
fonte

Giocare a golf in matematica. o0 Grazie!

— totalmente umano il

2

Gelatina , 24 byte

ḲV÷ȷ2ạ1×Ṫ$×255ḞṃØHṙ1¤ṭ”#

Un programma completo che stampa il risultato.

Provalo online!

Nota: è possibile utilizzare l'arrotondamento anziché il pavimento inserendo i due byte di codice +.tra 255e Ḟ.

Come?

ḲV÷ȷ2ạ1×Ṫ$×255ḞṃØHṙ1¤ṭ”# - Main link: list of character, s
Ḳ                        - split at spaces (makes a list of lists of characters)
 V                       - evaluate as Jelly code (makes a list of the decimal numbers)
   ȷ2                    - literal 100
  ÷                      - divide (vectorises to yield [C/100, M/100, Y/100, K/100])
     ạ1                  - absolute difference with 1 -> [1-(C/100),...]
         $               - last two links as a monad:
        Ṫ                -   tail (this is 1-(K/100))
       ×                 -   multiply (vectorises across the other three)
          ×255           - multiply by 255 (vectorises)
              Ḟ          - floor to the nearest integer
                    ¤    - nilad followed by link(s) as a nilad:
                ØH       -   hex-digit yield = "0123456789ABCDEF"
                  ṙ1     -   rotate left by 1 -> "123456789ABCDEF0"
               ṃ         - base decompress (use those as the digits for base length (16))
                      ”# - literal character '#'
                     ṭ   - tack
                         - implicit print

— Jonathan Allan
fonte

Un altro modo di arrotondare sarebbe _.Ċinvece +.Ḟ... ma quest'ultimo è forse più ampiamente usato.

— Erik the Outgolfer,

2

Retina , 103 byte

\d+
$*1;100$*
(1*);\1

1(?=.* (1*))|1
$1
1
51$*
(1{32000})*(1{2000})*1*.
;$#1;$#2
T`d`L`1\d
;B\B|;

^
#

Provalo online! Nota: questo codice è molto lento, quindi per favore non martellare il server di Dennis. Spiegazione:

\d+
$*1;100$*
(1*);\1

Converti ogni numero in unario e sottrai da 100.

1(?=.* (1*))|1
$1

Moltiplica tutti i numeri per l'ultimo numero, che viene eliminato.

1
51$*

Moltiplicare per 51, in modo che una volta diviso per 2000, otteniamo 100 * 100 * 51 / 2000 = 255come desiderato.

(1{32000})*(1{2000})*1*.
;$#1;$#2

Dividi per 32000 e piano dividi il resto per 2000, generando così una coppia di valori di base 16, anche se purtroppo sono ancora scritti nella base 10.

T`d`L`1\d
;B\B|;

Converti dalla base 10 alla base 16.

^
#

Inserisci il comando #.

— Neil
fonte

2

Java 8, 166 byte

s->{int i=0,c[]=java.util.Arrays.stream(s.split(" ")).mapToInt(Byte::new).toArray();for(s="#";i<3;)s+=s.format("%02X",(int)(.0255*(100-c[i++])*(100-c[3])));return s;}

Provalo online!

— Justin Mariner
fonte

2

Javascript (ES6), 106 byte

f=
(s,z=s.split` `,k=z.pop())=>'#'+z.map(x=>('0'+(.0255*(100-x)*(100-k)+.5|0).toString(16)).slice(-2)).join``

<input id=i value="28 14 0 6"/><button onclick="o.innerHTML=f(i.value)"/>Go</button>
<pre id=o></pre>

Espandi frammento

— nderscore
fonte

2

C ++ (gcc) , 169 166 byte

#import<iostream>
#import<iomanip>
#define F(x)int(.0255*(100-x)*(100-k))
int main(){
int c,m,y,k;
std::cin>>c>>m>>y>>k;
std::cout<<"#"<<std::hex<<F(c)<<F(m)<<F(y);
}

Provalo online!

Utilizzando la formula ottimizzata. ~~Aggiunto +.5per convertire CMYK = 0 0 0 0corretto in RGB =0xffffff~~ che non è necessario.

— Karl Napf
fonte

1

Python 3 , 114 110 108 106 104 byte

@xnor ha salvato 4 byte: cancellato il codice non necessario
@rod ha salvato 2 byte: formula più breve
salvato 2 + 2 byte: range[3]come [0,1,2], indesiderato []rimosso

n=input().split()
print('#'+''.join(hex(int(.0255*(100-int(n[i]))*(100-int(n[3]))))[2:]for i in[0,1,2]))

Provalo online!

— officialaimm
fonte

1

Rubino , 92 + 1 per -p flag = 93 byte

gsub(/(.+) (.+) (.+) (.+)/){'#%X%X%X'%[$1,$2,$3].map{|n|255*(1-n.to_i/1e2)*(1-$4.to_i/1e2)}}

Provalo online!

— Alexis Andersen
fonte

1

Perl 5 , 58 52 + 1 (-a) = 59 53 byte

printf"#%2X%2X%2X",map{.0255*(100-$_)*(100-$F[3])}@F

Provalo online!

— Xcali
fonte

0

dc , 53 byte

16o?35Pskrsprlpr[Fk100/1r-255*1lk100/-*0k1/nz0<b]dsbx

Provalo online!

— R. Kap
fonte

0

Javascript, 104 byte

s=>"#"+[0,1,2].map(n=>("0"+((255-2.55*s[n])*(1-s[3]/100)|0).toString(16)).slice(-2),s=s.split` `).join``

Esempio di frammento di codice:

f=

s=>"#"+[0,1,2].map(n=>("0"+((255-2.55*s[n])*(1-s[3]/100)|0).toString(16)).slice(-2),s=s.split` `).join``

console.log(f("86 86 0 43"))
console.log(f("28 14 0 6"))
console.log(f("0 41 73 4"))

Espandi frammento

— Herman L
fonte

0

q / kdb +, 55 byte

Soluzione:

"#",raze{(last($)0x0 vs)each"h"$.0255*x[3]*x 0 1 2}100-

Esempi:

q)"#",raze{(last($)0x0 vs)each"h"$.0255*x[3]*x 0 1 2}100-86 86 0 43
"#141491"
q)"#",raze{(last($)0x0 vs)each"h"$.0255*x[3]*x 0 1 2}100-28 14 0 6
"#adcef0"
q)"#",raze{(last($)0x0 vs)each"h"$.0255*x[3]*x 0 1 2}100-0 41 73 4
"#f59042"

Spiegazione:

Abbastanza semplice, ruba il 0.0255trucco da altre soluzioni (grazie!). La valutazione viene eseguita da destra a sinistra.

"#",raze {(last string 0x0 vs) each "h"$ .0255 * a[3] * a 0 1 2}100- / ungolfed
         {                                                     }     / lambda function
                                                                100- / subtract from 100 (vector)
                                                        a 0 1 2      / index into a at 0, 1 and 2 (CMY)
                                                 a[3]                / index into at at 3 (K)
                                                      *              / multiply together
                                         .0255 *                     / multiply by 0.255
                                    "h"$                             / cast to shorts
          (                  ) each                                  / perform stuff in brackets on each list item
                       0x0 vs                                        / converts to hex, 1 -> 0x0001
                string                                               / cast to string, 0x0001 -> ["00", "01"]
           last                                                      / take the last one, "01"
    raze                                                             / join strings together
"#",                                                                 / prepend the hash

Appunti:

Arrotonda i numeri per impostazione predefinita, costerebbe 3 byte (_)al piano invece di lanciarlo in breve.

— streetster
fonte

0

05AB1E , 18 byte

$#т/-¤s¨*255*hJ'#ì

Provalo online!

-1 grazie a kalsowerus .

Ha imprecisioni in virgola mobile, quindi i risultati potrebbero essere off-by-one, ma viene utilizzata la formula nella domanda.

— Erik the Outgolfer
fonte

Puoi salvare un byte: $è lo stesso di1¹

— kalsowerus

@kalsowerus Beh, non esattamente, ma funzionerebbe in questo caso ...

— Erik the Outgolfer,

Oh giusto .. Non sono sicuro di quale input ci siano inputquando ce ne sarebbero più

— Kalsowerus,

0

Haskell, 165 byte

q=(1-).(/100)
x!y=h$ceiling$q x*(q y)*255
f c m y k=concat["#",c!k,m!k,y!k]
h x|x<16=[s!!x]|0<1=(h((x-m)`quot`16))++[s!!m] where m=x`mod`16
s=['0'..'9']++['a'..'f']

— Sergii Martynenko Jr
fonte

0

Fortran, 156 byte

PROGRAM C
REAL,DIMENSION(4,3)::d
READ(*,*)((d(i,j),i=1,4),j=1,3)
WRITE(*,'((A,3(Z2)))')(35,(INT(.0255*(100-d(i,j))*(100-d(4,j))),i=1,3),j=1,3)
END PROGRAM C

— Zongor
fonte

Converti i valori CMYK in RGB

PHP , 90 byte

Python 3 , 100 98 byte

Gelatina , 24 byte

Come?

Retina , 103 byte

Java 8, 166 byte

Javascript (ES6), 106 byte

C ++ (gcc) , 169 166 byte

Python 3 , 114 110 108 106 104 byte

Rubino , 92 + 1 per -p flag = 93 byte

Perl 5 , 58 52 + 1 (-a) = 59 53 byte

dc , 53 byte

Javascript, 104 byte

q / kdb +, 55 byte

05AB1E , 18 byte

Haskell, 165 byte

Fortran, 156 byte