Equivalente trasparente di un dato colore

Question

Ho avuto questo alcune volte, quindi ecco: sto facendo alcuni grafici che tengono curve con le stime di un parametro dato un parametro di sintonia.

In genere, dispongo anche di SD per ciascun valore stimato, pertanto è possibile visualizzare barre di errore attorno a ciascuna di esse.

Tuttavia, non mi piacciono le barre di errore, e preferirei una versione livellata di esso. Questo non è di per sé un problema (es. So come farlo). Tuttavia, la mia trama contiene molte di queste curve simili, ognuna con il proprio colore. Quindi vorrei aggiungere "l'errorregion levigata" a ciascuna curva in un colore che corrisponda al colore della curva stessa. Certo, mi piacerebbe farlo in modo un po 'trasparente, così posso ancora vedere le altre curve attraverso la' regione di errore '.

Quindi, la mia domanda è: dato un colore (specificato da un numero, un nome o un valore rgb --- nota che i primi due pongono un problema in più, ma questo si verifica piuttosto spesso, come le funzioni di tracciamento di base prendi questi come valori di colore validi), come posso trovare trovare il colore corrispondente che ha lo stesso rgb ma un livello alfa diverso (dato) (trasparenza). Vorrei una funzione come:

makeTransparent<-function(someColor, alpha=100) 
{ 
    newColor<-someColor + alpha #I wish 
    return(newColor) 
} 

Questo dovrebbe funzionare per cose come:

makeTransparent(2) 
makeTransparent("red") 
makeTransparent(rgb(0,0,1)) 

Edit Odio quando mi manca qualcosa di ovvio, ma @themel mi ha segnalato ad esso (thx di nuovo). Ecco una soluzione completa (nota: opere vettoriale, in modo da poter passare più di un colore, un solo alfa è supportata in questo momento però):

#note: always pass alpha on the 0-255 scale 
makeTransparent<-function(someColor, alpha=100) 
{ 
    newColor<-col2rgb(someColor) 
    apply(newColor, 2, function(curcoldata){rgb(red=curcoldata[1], green=curcoldata[2], 
    blue=curcoldata[3],alpha=alpha, maxColorValue=255)}) 
} 

Answer 1

Avete dato un'occhiata al ?rgb?

utilizzati:

RGB (rosso, verde, blu, alfa, nomi = NULL, maxColorValue = 1)

Un valore di trasparenza alfa può essere specificato (come opacità, così ' 0 'significa completamente trasparente e' max 'significa opaco). Se alpha 'non è specificato, viene generato un colore opaco.

Il parametro alpha serve per specificare la trasparenza. col2rgb divide i colori R specificati in altri modi in RGB in modo da poterli inviare a rgb.

Answer 2

Penso che sia più comune specificare alpha in [0,1]. Questa funzione farlo, più accettare diversi colori come argomenti:

makeTransparent = function(..., alpha=0.5) { 

    if(alpha<0 | alpha>1) stop("alpha must be between 0 and 1") 

    alpha = floor(255*alpha) 
    newColor = col2rgb(col=unlist(list(...)), alpha=FALSE) 

    .makeTransparent = function(col, alpha) { 
    rgb(red=col[1], green=col[2], blue=col[3], alpha=alpha, maxColorValue=255) 
    } 

    newColor = apply(newColor, 2, .makeTransparent, alpha=alpha) 

    return(newColor) 

} 

E, alla prova:

makeTransparent(2, 4) 
[1] "#FF00007F" "#0000FF7F" 
makeTransparent("red", "blue") 
[1] "#FF00007F" "#0000FF7F" 
makeTransparent(rgb(1,0,0), rgb(0,0,1)) 
[1] "#FF00007F" "#0000FF7F" 

makeTransparent("red", "blue", alpha=0.8) 
[1] "#FF0000CC" "#0000FFCC" 

Answer 3

C'è una funzione adjustcolor in grDevices pacchetto, che funziona così nel tuo caso:

adjustcolor("red", alpha.f = 0.2)