Участок с кружком

Я работаю с библиотекой circlize и делаю сюжет. Ниже вы можете увидеть код

library(circlize)
random_values<-c(500:100)

random_sample<-sample(random_values,15)

col.pal = c(BMW = "red",
            Honda = "green",
            Nissan = "blue",
            Tesla = "grey",
            Toyota = "maroon",
            Phoenix = "grey",
            Tucson = "black",
            Sedona = "grey"
              )
Sample_Matrix <- matrix( 
                    random_sample,
                    nrow = 5,
          dimnames = list(c("BMW","Honda","Nissan","Tesla","Toyota"),
                          c("Phoenix","Tucson","Sedona")))

chordDiagram(Sample_Matrix,grid.col = col.pal)
                                                    

Теперь я хочу использовать заголовок этого заголовка на этом сюжете. Я часто использовал ggplot2, и у меня есть заголовок с тем же шрифтом, что и ggplot2, для создания графика. Может ли кто-нибудь помочь мне, как это сделать?