4
$\begingroup$

In Mathematica, customizing Sections, Subsections, Titles and so on, can be done with Format > Style > .... Changing the background color of a style is one of the things you can do. Here is an example where I have colored the background orange:

enter image description here

But I want to change the background to show a color gradient. I mean, instead of having the same orange in all of the background, there should be a gradient so the orange fades from top to bottom. Gradient styles will be found in Palettes > Color Schemes. But I can't get it to work for changing the color of a cell background.

$\endgroup$
  • 1
    $\begingroup$ I don't know if it's possible to specify a gradient background (it may be in recent versions, but I don't think it is in v7 -- which I use). Nevertheless you can specify a bitmap fill for full control: (6318) $\endgroup$ – Mr.Wizard Jun 4 '14 at 10:45
  • 2
    $\begingroup$ @Mr.Wizard youtube.com/watch?v=TQs3gVobcfg&feature=youtu.be&t=25s $\endgroup$ – Dr. belisarius Jun 4 '14 at 12:52
  • $\begingroup$ @belisarius Crikey! =:-O $\endgroup$ – Mr.Wizard Jun 4 '14 at 12:56
  • $\begingroup$ @goldberg, thank you for your editing. $\endgroup$ – Unbelievable Jun 4 '14 at 13:55
4
$\begingroup$

I'm not sure how exactly to integrate this with a stylesheet background, but here is a way to achieve gradients using Graphics:

Overlay@{
  Graphics[
   Raster@{List@@@Table[Blend["AvocadoColors",i],{i,0,1,.005}]},
   AspectRatio->1/2,
   ImageSize->Full],
  Graphics[
   Text@Style["Gradient!",FontSize->Scaled@.2],
   AspectRatio->1/2,
   ImageSize->Full]}

enter image description here

EDIT

I stumbled on a different way to do this that would be easier for simple layouts (tidied up with kguler's suggestion):

Graphics[{
  Polygon[
    {{0, 0}, {1, 0}, {1, 1}, {0, 1}}, 
    VertexColors -> {Yellow, Yellow, Green, Green}], 
  Text[
    Style["Gradient!", FontSize -> Scaled@.2], 
    Scaled[{.5, .5}]]}, ImageSize -> Full, AspectRatio -> 1/2]

enter image description here

$\endgroup$
  • $\begingroup$ You can do without Overlay putting Text[..] and Polygon[...] in a single Graphics: Graphics[{Polygon[{{0, 0}, {1, 0}, {1, 1}, {0, 1}}, VertexColors -> {Yellow, Yellow, Green, Green}], Text[Style["Gradient!", FontSize -> Scaled@.2], Scaled[{.5, .5}]]}, ImageSize -> Full, AspectRatio -> 1/2] $\endgroup$ – kglr Jun 6 '14 at 19:28
  • $\begingroup$ @kguler I was just exercising my fingers :P $\endgroup$ – mfvonh Jun 6 '14 at 20:07

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.