How to set a default title for plots?

Questions
1

I have a couple of ListLinePlots that I create in my notebook. I want the title of each plot to appear as

Style["〈the title〉", FontSize -> 18, Black]

Doing

SetOptions[ListLinePlot,
    PlotLabel -> Style["my title", FontSize -> 18, Black], 
]

doesn’t seem to work. For example,

ListLinePlot[
 {}
 ,PlotLabel -> "Plot no. 1"]

inserts the title “Plot no.1” but all the directives from SetOptions are not taken into effect. Why?

2

The option LabelStyle -> {FontSize -> 18, Black} does that, but unfortunately it affects tick labels too, which may be remedied with TicksStyle.

3

I just tried

SetOptions[ListLinePlot,
  LabelStyle -> {FontSize -> 18, Red}, 
  TicksStyle -> {Directive[Black, 20]},
  AxesStyle -> Directive[Black, 8]
  ];
ListLinePlot[
 {}
 , PlotLabel -> "Plot no. 1"]

but I I see no change in the ticks font size. Why?

3093Untitled.png
3093Untitled.png480×317 2.51 KB

4

Hmm, it seems that LabelStyle overrides TicksStyle. I wonder why.

5

As a workaround one can define a custom plot:

myPlot[data_, myTitle_, opts___] :=
 ListLinePlot[data, opts,
  PlotLabel -> Style[myTitle, 18, Black]]
6

I see no problem

Open in Wolfram Cloud ↗
7

Going a step further:

Open in Wolfram Cloud ↗