9

Konvertieren Sie die in CMYK angegebenen Farbcodes in den RGB-Wert.

Eingabe:
Zeichenfolge mit 4 Ganzzahlen (von 0 bis 100), getrennt durch Leerzeichen

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

Ausgabe:

#141592
#ABCDEF
#F49043

Der kürzeste Code gewinnt!

TIPP: Zum Konvertieren von CMYK in RGB können Sie folgende Formeln verwenden:
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)   
und verwenden Sie diese drei Variablen, um den Wert im #RRGGBBFormat zu erhalten

code-golf conversion color War ich
quelle

1

Können wir CMYKWerte als Dezimalzahlen aus 0zu 1oder ist es erforderlich , zu tun 0zu 100?

HyperNeutrino

1

Sollen wir auch mehrere CMYK-Codes gleichzeitig oder nur einen eingeben und konvertieren?

HyperNeutrino

7

Können wir die Eingabe als eine Liste von Zahlen nehmen oder muss es eine begrenzte Zeichenfolge sein?

Business Cat

7

Die von Ihnen bereitgestellte Eingabe / Ausgabe stimmt nicht mit der Formel überein. Wie sollen wir mit der Rundung umgehen?

Rod

2

@ Rod Es ist noch etwas unklar, wie mit Gleitkomma-Ungenauigkeiten umgegangen werden soll.

Erik der Outgolfer

5

PHP , 90 Bytes

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

Probieren Sie es online aus!

Jörg Hülsermann
quelle

2

Python 3 , 100 98 Bytes

-2 Bytes dank Rod.

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

Probieren Sie es online aus!

total menschlich
quelle

Golfen die Mathematik. o0 Danke!

totalmenschlich

2

Gelee , 24 Bytes

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

Ein vollständiges Programm, das das Ergebnis druckt.

Probieren Sie es online aus!

Hinweis: Durch Einfügen der beiden Codebytes +.zwischen 255und kann anstelle von Bodenbelägen eine Rundung verwendet werden Ḟ.

Wie?

Ḳ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
quelle

Ein anderer Weg zum Runden wäre _.Ċstatt +.Ḟ... aber letzterer wird vielleicht häufiger verwendet.

Erik der Outgolfer

2

Netzhaut , 103 Bytes

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

^
#

Probieren Sie es online aus! Hinweis: Dieser Code ist sehr langsam, also hämmern Sie bitte nicht auf Dennis 'Server. Erläuterung:

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

Konvertiere jede Zahl in unär und subtrahiere von 100.

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

Multiplizieren Sie alle Zahlen mit der letzten Zahl, die gelöscht wird.

1
51$*

Mit 51 multiplizieren, so dass wir nach dem Teilen durch 2000 100 * 100 * 51 / 2000 = 255wie gewünscht erhalten.

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

Teilen Sie durch 32000 und teilen Sie den Rest durch 2000, wodurch ein Paar von Basis-16-Werten erzeugt wird, obwohl sie leider selbst noch in Basis 10 geschrieben sind.

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

Konvertieren Sie von Basis 10 zu Basis 16.

^
#

Fügen Sie die Führung ein #.

Neil
quelle

2

Java 8, 166 Bytes

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

Probieren Sie es online aus!

Justin Mariner
quelle

2

Javascript (ES6), 106 Bytes

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>

Erweitern Sie das Snippet

nderscore
quelle

2

C ++ (gcc) , 169 166 Bytes

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

Probieren Sie es online aus!

Verwendung der optimierten Formel. ~~Hinzugefügt +.5, um CMYK = 0 0 0 0korrekt in RGB = zu konvertieren,0xffffff~~ was nicht erforderlich ist.

Karl Napf
quelle

1

Python 3 , 114 110 108 106 104 Bytes

@xnor 4 Bytes gespeichert: unnötigen Code gelöscht
@rod hat 2 Bytes gespeichert: kürzere Formel
2 + 2 Bytes gespeichert: range[3]as [0,1,2], unerwünscht []entfernt

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

Probieren Sie es online aus!

Officialaimm
quelle

1

Ruby , 92 + 1 für -p Flag = 93 Bytes

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

Probieren Sie es online aus!

Alexis Andersen
quelle

1

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

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

Probieren Sie es online aus!

Xcali
quelle

0

Gleichstrom , 53 Bytes

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

Probieren Sie es online aus!

R. Kap
quelle

0

Javascript, 104 Bytes

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

Beispielcode-Snippet:

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"))

Erweitern Sie das Snippet

Herman L.
quelle

0

q / kdb +, 55 Bytes

Lösung:

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

Beispiele:

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"

Erläuterung:

Ziemlich einfach, hat den 0.0255Trick aus anderen Lösungen gestohlen (danke!). Die Auswertung erfolgt von rechts nach links.

"#",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

Anmerkungen:

Die Anzahl der Runden würde standardmäßig 3 Byte pro (_)Etage kosten , bevor sie zu kurz geworfen wird.

Streetster
quelle

0

05AB1E , 18 Bytes

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

Probieren Sie es online aus!

-1 dank kalsowerus .

Hat Gleitkomma-Ungenauigkeiten, so dass die Ergebnisse möglicherweise nacheinander abweichen, aber die Formel in der Frage wird verwendet.

Erik der Outgolfer
quelle

Sie können ein Byte speichern: $ist genau das gleiche wie1¹

kalsowerus

@ kalsowerus Nun, nicht genau, aber es würde in diesem Fall funktionieren ...

Erik der Outgolfer

Oh richtig .. Ich bin nicht sicher, welche Eingabe ist, inputwenn es mehrere geben würde

kalsowerus

0

Haskell, 165 Bytes

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.
quelle

0

Fortran, 156 Bytes

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
quelle

Konvertieren Sie CMYK-Werte in RGB

Antworten:

PHP , 90 Bytes

Python 3 , 100 98 Bytes

Gelee , 24 Bytes

Wie?

Netzhaut , 103 Bytes

Java 8, 166 Bytes

Javascript (ES6), 106 Bytes

C ++ (gcc) , 169 166 Bytes

Python 3 , 114 110 108 106 104 Bytes

Ruby , 92 + 1 für -p Flag = 93 Bytes

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

Gleichstrom , 53 Bytes

Javascript, 104 Bytes

q / kdb +, 55 Bytes

05AB1E , 18 Bytes

Haskell, 165 Bytes

Fortran, 156 Bytes