Вы просто взяли бы это изображение и добавили бы каждый цвет по одному к каждой шестнадцатеричной цифре. Например, #49de5fстанет #5aef60(с 9циклом в aи fциклом в 0.)

Это также означало бы, что все white ( #ffffff) станут черными ( #000000), потому что все fциклы вернутся назад 0, но весь черный станет более светлым оттенком черного ( #111111).

Оценка основана на наименьшем количестве используемых байтов, так как это вопрос кода-гольфа .

Используйте приведенное ниже изображение в качестве входного изображения для своего кода и поместите выходное изображение своего кода в свой ответ.

Если вы хотите, вы также можете использовать это другое изображение радуги:

Пайк, 17 13 байт

.Fh16j%ijcjs 8{

Попробуй это здесь!

.F            - for i in deep_for(input):
  h16%        -    (i+1)%16
          +   -   ^+V
      i16+    -    (i+16)
           8{ -  unset_bit(8, ^)

Принимает ввод в виде целочисленного массива пикселей и выводит его в том же формате

Mathematica, 78 байт

Image@Apply[16#+#2&,Mod[IntegerDigits[#~ImageData~"Byte",16,2]+1,16]/255,{3}]&

Принимает и возвращает объект изображения (чтобы создать объект изображения, просто вставьте изображение в Mathematica).

Результат для теста:

Принимая входные данные и возвращая выходные данные в виде трехмерного массива целочисленных значений канала, это уменьшает до 51 байта :

Apply[16#+#2&,Mod[IntegerDigits[#,16,2]+1,16],{3}]&

Но эти мета-посты пока не имеют подавляющего количества поддержки, поэтому сейчас я собираюсь использовать 78-байтовую версию.

Verilog, 220 байт:

• Программы могут принимать входные данные как массив значений пикселей RGB с размерами
• Программы могут выводить через массив значений пикселей RGB с размерами

В настоящее время неясно, как должны быть предоставлены измерения, и должен ли массив передаваться или предоставляться одновременно. Я собираюсь передавать его по 8 бит за раз, используя тактовый сигнал (с флагом допустимых данных, который становится низким после обработки всего изображения), и вводить / выводить размеры в виде 32-битных целых чисел:

module a(input[31:0]w,input[31:0]h,input[7:0]d,input c,output[31:0]W,output[31:0]H,output reg[7:0]D,output reg v=0);assign W=w;assign H=h;reg[65:0]p=1;always@(posedge c) begin v<=(p<3*w*h); p<=p+v; D<=d+17; end endmodule

Python, 226 байт

Теперь это действительно!

Используйте библиотеку подушек.

from PIL import Image
m=Image.open(input()).convert("RGB")
for y in range(m.size[1]):
 for x in range(m.size[0]):
    t=m.getpixel((x,y))
    h=t[0]+(t[1]<<8)+(t[2]<<16)+1118481
    m.putpixel((x,y),(h&255,h>>8&255,h>>16&255))
m.show()

Выход:

Спасибо @TuukkaX за сохранение 9 байтов!
Спасибо @ mbomb007 за сохранение 18 байт!

Дьялог АПЛ , 21 15 байт

Программы могут выводить в виде матрицы значений пикселей RGB

Я предполагаю, что вывод может быть в том же формате.

Новое решение принимает матрицу значений [[ r , g , b , r , g , b ], [ r , g , b ,…

16⊥16|1+16 16⊤⎕

объяснение

⎕получить числовой ввод
16 16⊤преобразовать в 2-значное основание 16
1+добавить 1, то есть 0 → 1, 1 → 2, 15 → 16
16|модуль 16, т.е. 16 → 0
16⊥преобразовать из базы 16

пример

      ⊢m←2 6⍴90 239 96 255 255 255 0 0 0 239 239 239
90 239 96 255 255 255
 0   0  0 239 239 239
      16⊥16|1+⎕⊤⍨2/16
⎕:
      m
107 240 113   0   0   0
 17  17  17 240 240 240

Старое 21-байтовое решение принимает матрицу [["RRGGBB", "RRGGBB"], ["RRGGBB",…

{n[16|1+⍵⍳⍨n←⎕D,⎕A]}¨

Необходимо ⎕IO←0, что по умолчанию на многих системах.

объяснение

{… }¨Для каждой 6-символьной строки RGB представьте ее как ⍵и сделайте:
n←⎕D,⎕Aприсвойте «0… 9A… Z» n, чтобы
⍵⍳⍨найти индексы отдельных символов в n,
1+ добавить один в индекс, то есть 0 → 1, 1 → 2, 15 → 16
16|модуль 16, т.е. 16 → 0
n[... ]использовать это, чтобы индексировать в п

пример

      f←{n[16|1+⍵⍳⍨n←⎕D,⎕A]}¨ 
      ⊢p←2 2⍴'5AEF60' 'FFFFFF' '000000' 'EFEFEF'
┌──────┬──────┐
│5AEF60│FFFFFF│
├──────┼──────┤
│000000│EFEFEF│
└──────┴──────┘
      f p           
┌──────┬──────┐
│6BF071│000000│
├──────┼──────┤
│111111│F0F0F0│
└──────┴──────┘

C - 114 113 70 66 61 72 67 байт

Вот код (с поддержкой тестового примера Мартина Эндера (без 60b)):

main(c,b){for(;~(b=getchar());putchar(c++<54?b:b+16&240|b+1&15));}

И вот менее запутанная версия:

main( c, b ) //Defaults to int
{
    //Get characters until EOF occurs
    //Copy first 54 bytes of header, later add 1 to each hexadecimal digit
    for ( ; ~( b = getchar( ) ); putchar( c++ < 54 ? b: b + 16 & 240 | b + 1 & 15 ) ); 
}

Скомпилируйте и запустите gcc -o color colorgolf.c && cat a.bmp | ./color > b.bmp

Этот код поддерживает работу с растровыми изображениями . Чтобы преобразовать pngфайлы в bmp, я использовал следующую команду:convert -flatten -alpha off png.png a.bmp

Код предполагает, что bmpзаголовок имеет длину 54 байта - в этом случае это работает, но я не уверен, что я что-то не нарушаю.

Также это радуга:

Java 142 байта

public BufferedImage translateColor(BufferedImage image){
  for(int i=-1;++i<image.getWidth();)
    for(int j=-1;++<image.getHeight();)
      image.setRGB(i,j,image.getRGB(i,j)+1118481);
  return image;
}

Golfed:

BufferedImage t(BufferedImage i){for(int x=-1;++x<i.getWidth();)for(int y=-1;++y<i.getHeight();)i.setRGB(x,y,i.getRGB(x,y)+1118481);return i;}

R, 302 байта

Далеко не идеально, но здесь идет:

a<-as.raster(imager::load.image(file.choose()));l=letters;n=as.numeric;d=a;f=function(x){if(suppressWarnings(is.na(n(x)))){if(x=="F")"0" else{l[match(x,toupper(l))+1]}}else{if(x==9)"A" else as.character(n(x)+1)}};for(o in 1:90){for(g in 1:200){for(h in 2:7){substr(d[o,g],h,h)<-f(substr(a[o,g],h,h))}}}

Объяснение:

a<-as.raster(imager::load.image(file.choose()));  //chooses file
l=letters;n=as.numeric;d=a;                      //shortens some names and creates
                                                   duplicate variable to modify

f=function(x){                                //creates a function that takes in a
   if(suppressWarnings(is.na(n(x)))){            character type and checks whether it is
      if(x=="F")"0"                              a number or letter.
      else{l[match(x,toupper(l))+1]}}            Returns the converted letter or number.                               
   else{                                   
      if(x==9)"A"                         
      else as.character(n(x)+1)}         
};                                      

for(o in 1:90){                       //loops through every single hex digit and applies
   for(g in 1:200){                     the converting function, modifying the duplicate
      for(h in 2:7){                    variable. Now you have 2 images =D

         substr(d[o,g],h,h)<-f(substr(a[o,g],h,h))

      }
   }
}