I would like to use a custom svg to as busyindicator, but this custom svg contains multiple colors. Is it possible to use the custom colors, instead of a standard color?
library(bslib)
ui <- page_fillable(
useBusyIndicators(),
busyIndicatorOptions(spinner_type = "spinner.svg", spinner_size = "150px"),
# busyIndicatorOptions(spinner_type = "bars"),
plotOutput("plot")
)
server <- function(input, output, session) {
output$plot <- renderPlot({
Sys.sleep(5)
plot(x = rnorm(100), y = rnorm(100))
})
}
shinyApp(ui, server)
and the svg (spinner.svg):
<svg id="Layer_1" xmlns="http://www.w3.org/2000/svg" viewBox="302.2 178.87 237.54 237.52"><defs><style>.spinner-circle > path {stroke: #fff; stroke-miterlimit: 10;}</style></defs><g class="spinner-circle" data-name="Spinner circle"><path fill="#afca0d" d="M504.56,381.25,494,370.65a102.59,102.59,0,0,0,30.24-73h15A117.48,117.48,0,0,1,504.56,381.25Z"/><path fill="#7e4792" d="M347.94,224.63,337.33,214a117.48,117.48,0,0,1,83.61-34.63v15A102.57,102.57,0,0,0,347.94,224.63Z"/><path fill="#2059a6" d="M539.19,297.64h-15a102.58,102.58,0,0,0-30.24-73L504.56,214A117.5,117.5,0,0,1,539.19,297.64Z"/><path fill="#00a0cc" d="M494,224.63a102.58,102.58,0,0,0-73-30.24v-15A117.49,117.49,0,0,1,504.56,214Z"/><path fill="#f39204" d="M420.94,415.89a117.45,117.45,0,0,1-83.61-34.64l10.61-10.6a102.57,102.57,0,0,0,73,30.24Z"/><path fill="#53a333" d="M420.94,415.89v-15a102.58,102.58,0,0,0,73-30.24l10.61,10.6A117.45,117.45,0,0,1,420.94,415.89Z"/><path fill="#e5252a" d="M337.33,381.25a117.44,117.44,0,0,1-34.63-83.61h15a102.55,102.55,0,0,0,30.24,73Z"/><path fill="#d8348a" d="M317.7,297.64h-15A117.46,117.46,0,0,1,337.33,214l10.61,10.61A102.54,102.54,0,0,0,317.7,297.64Z"/><animateTransform attributeName="transform" attributeType="XML" type="rotate" from="0 420.945 297.64" to="360 420.945 297.64" dur="4s" repeatCount="indefinite"/></g><g data-name="Spinner CBS logo"><circle fill="#ffffff" cx="420.945" cy="297.64" r="103" /><path fill="#00a0cc" d="M410.62,254.77v7.5H388.91v18h21.71v7.52H381.49v-33Zm5.11-5.26H380.94a4.69,4.69,0,0,0-1.81.37,4.75,4.75,0,0,0-1.53,1.05,4.65,4.65,0,0,0-1,1.54,4.75,4.75,0,0,0-.35,1.82V293h39.5V275H394v-7.49h21.7v-18Zm19.42-16.39v21.63h25.3v33H427.71V233.12Zm0,47.13H453v-18H435.15Zm.47-52.37H422.55V293h43.11V254.28a4.75,4.75,0,0,0-4.71-4.77H440.34V232.88a5,5,0,0,0-4.72-5Zm4.7,47.11v-7.51h7.49V275Zm20.06,30.08v7.59H388.91v17.18h71.47v32.33H381.47v-7.52H453V337.36H381.47V305h78.88Zm5.08-5.29H376.3v42.79h71.47v6.8H376.3v13.26A4.75,4.75,0,0,0,381,367.4h79.87a4.75,4.75,0,0,0,4.71-4.77v-38H394.12v-6.67h71.47V299.83Z"/></g></svg>