SVG HTML Charts UDFs

[wujunmin]

FUNCTION SVG_Shape =
(IconIndex:numeric,Color:string)=>
"data&colon;image/svg+xml;utf8,<svg xmlns='http://www.w3.org/2000/svg' id='wujunmin' width='48' height='48'>" &
SWITCH(IconIndex,
1,"<rect rx='24' x='0' y='0' width='48' height='48' fill='" & Color & "'/>",
2,"<rect rx='5' x='0' y='0' width='48' height='48' fill='" & Color & "'/>",
3,"<path d='M5.41421 22.5858L22.5858 5.41421C23.3668 4.63317 24.6332 4.63316 25.4142 5.41421L42.5858 22.5858C43.3668 23.3668 43.3668 24.6332 42.5858 25.4142L25.4142 42.5858C24.6332 43.3668 23.3668 43.3668 22.5858 42.5858L5.41421 25.4142C4.63317 24.6332 4.63316 23.3668 5.41421 22.5858Z' fill='" & Color & "'/>",
4,"<circle cx='24' cy='24' r='20' stroke='" & Color & "' fill='none' stroke-width='2'/>") & "
</svg>"

e.g. Measure = SVG_Shape(3,if([M.KPI]>=0.5,"green","rgb(255,0,0)"))

FUNCTION SVG_Text_Icon =
(TextIcon:string,BackgroundColor:string,FontColor:string)=>
"data&colon;image/svg+xml;utf8,<svg xmlns='http://www.w3.org/2000/svg' id='wujunmin' width='96' height='96'>
<rect rx='5' x='0' y='0' width='96' height='96' fill='" & BackgroundColor & "'/>
<text x='48' y='48' text-anchor='middle' dominant-baseline='central' font-size='60' fill='" & FontColor & "'>" &
TextIcon & "</text1>
</svg>"

e.g. Measure = SVG_Text_Icon(IF([M.KPI]>=1,"A","B"), IF([M.KPI]>=1,"green","red") ,"snow")

FUNCTION SVG_Rank =
(ColumnRank:anyref,MeasureRank:numeric expr,BackgroundColor:string)=>
"data&colon;image/svg+xml;utf8,<svg xmlns='http://www.w3.org/2000/svg' id='wujunmin' width='96' height='96'>
<rect rx='48' x='0' y='0' width='96' height='96' fill='" & BackgroundColor & "'/>
<text x='48' y='48' text-anchor='middle' dominant-baseline='central' font-size='60' fill='snow'>" &
RANKX(ALLSELECTED(ColumnRank),MeasureRank) & "</text>
</svg>"

e.g.  Measure = SVG_Rank('store'[storeID],[M.sales],"brown")

FUNCTION SVG_Bar =
(ColumnForBar:anyref,MeasureForBar:numeric expr,Color:string)=>
VAR MaxValue = MAXX(ALLSELECTED(ColumnForBar), MeasureForBar)
VAR Width = 280 * MeasureForBar / MaxValue
RETURN
"data&colon;image/svg+xml;utf8,<svg xmlns='http://www.w3.org/2000/svg' id='wujunmin' width='300' height='36' >
<rect rx='2' x='10' y='16' width='280' height='4' fill='#f0f0f0'/>
<rect rx='2' x='"& (300-Width)/2 & "' y='12' width='" & Width & "' height='12'
fill='" & Color & "' stroke='none'/>
<text x='150' y='8' text-anchor='middle' font-size='11' fill='#333333'>
" & FORMAT(MeasureForBar,"#,##") & "
</text>
</svg>"

e.g. Measure= SVG_Bar('store'[storeID],[M.KPI],"Deepskyblue")

FUNCTION SVG_Progress_Bar =
(PctMeasure:numeric,Color:string)=>
"data&colon;image/svg+xml;utf8,<svg xmlns='http://www.w3.org/2000/svg' width='200' height='30'>
<path id='wujunmin' d='M0 15L200 15' stroke='" & Color & "' stroke-opacity='0.4' stroke-width='10' stroke-dasharray='2'/><path d='M0 15L" & 200 * PctMeasure & " 15' stroke='" & Color & "' stroke-width='10'/>
</svg>"

e.g. Measure = SVG_Progress_Bar([M.Pct],"brown")

FUNCTION SVG_Gradient_Bar =
(ColumnForBar:anyref,MeasureForBar:numeric expr,Color:string)=>
VAR MaxValue =
MAXX ( ALLSELECTED(ColumnForBar), MeasureForBar)
VAR LinearGradient= "
<defs>
<linearGradient id='wujunmin'>
<stop offset='0%' style='stop-color:white'/>
<stop offset='100%' style='stop-color:" & Color & "'/>
</linearGradient>
</defs>"
VAR SVG = "
data&colon;image/svg+xml;utf8,
<svg xmlns='http://www.w3.org/2000/svg' width='200' height='30' > " &
LinearGradient & "
<rect rx='2' x='0' y='5' width='" & 200 * MeasureForBar / MaxValue & "' height='20'
fill='url(#wujunmin)'
/>
</svg>"
RETURN
SVG

e.g. Measure = SVG_Gradient_Bar('Store'[StoreID],[M.KPI],"Brown")

FUNCTION SVG_Waffle =
(PctMeasure:numeric,Color:string)=>
VAR t =
GENERATESERIES ( 1, 10 )
VAR tPlus =
GENERATE ( SELECTCOLUMNS ( t, "Value1", [Value] ), t )
VAR tPlusPlus =
ADDCOLUMNS ( tPlus, "Index", RANKX ( tPlus, [Value] + [Value1] / 100,, ASC ) )
VAR tWaffle =
ADDCOLUMNS (
tPlusPlus,
"circle",
"<circle cx='" & [Value] * 10 -5 & "' cy='" & [Value1] * 10 -5 & "' r='4' fill='"
& IF ( [Index] <= ROUND (PctMeasure * 100, 0 ), Color , "LightGrey" ) & "' />")
RETURN
"data&colon;image/svg+xml;utf8,<svg xmlns='http://www.w3.org/2000/svg' id='wujunmin' width='100' height='100'>
<g transform='rotate(-90,50,50)'>" & CONCATENATEX ( tWaffle, [circle] ) & "</g>
</svg> "

e.g. Measure = SVG_Waffle([M.Pct],IF([M.Pct]<0.5,"Brown","green"))

FUNCTION SVG_Bubble =
(ColumnForBubble:anyref,MeasureForBubble:numeric expr,Color:string)=>
"data&colon;image/svg+xml;utf8,<svg xmlns='http://www.w3.org/2000/svg' id='wujunmin' width='200' height='200'>
<circle cx='100' cy='100' r='" & 100 * SQRT ( ABS ( MeasureForBubble ) / MAXX ( ALLSELECTED ( ColumnForBubble ), ABS ( MeasureForBubble ) ) ) & "' fill='" & Color & "'/>
</svg>"

e.g. Measure = SVG_Bubble('Store'[StoreID],[M.KPI],"Deepskyblue")

---------------
HTML UDFs(HTML Content Visual)

FUNCTION HTML_CircleBG_Text=
(AnyText:string,BackgroundColor:string,TextColor:string)=>
"<head>
<style>
p {
font-size: 30px;
color: white;
font-weight: bold;
line-height: 1;
font-family: Arial, sans-serif;
}
.wujunmin {
background-color: " & BackgroundColor & ";
border-radius: 50%;
margin: 3px;
width: 60px;
height: 60px;
color: " & TextColor & ";
display: inline-flex;
align-items: center;
justify-content: center;
}
</style>
</head>
<body>
<p>" &
CONCATENATEX(
GENERATESERIES(1,LEN(AnyText)),
"<span class='wujunmin'>" & MID(AnyText,[Value],1) & "</span>",,[Value],ASC
) & "</p>
</body>"

e.g. Measure = HTML_CircleBG_Text("wujunmin","Brown","Snow")

FUNCTION HTML_Progress_Bar =
(ColumnForPct:anyref,PctMeasure:numeric,Color:string)=>
"<p style='font-size: 20px;background: linear-gradient(to right, " & Color & " " & FORMAT(PctMeasure,"0%") & ", lightgrey 0);border-radius: 20px;white-space: nowrap;padding-left:5px;'>" & SELECTEDVALUE(ColumnForPct) & " " & FORMAT(PctMeasure,"0%") & "</p>"

e.g. Measure = HTML_Progress_Bar('Store'[StoreID],[M.Pct],"tomato")

FUNCTION HTML_Bar_Ring =
(ColumnForChart:anyref,MeasureForBar:numeric expr,MeasureForRing:numeric)=>
VAR MaxSales = MAXX(ALLSELECTED(ColumnForChart), MeasureForBar)
VAR SalesPercentage = MeasureForBar / MaxSales * 100
VAR AchievementRate = MeasureForRing 
VAR CityName = SELECTEDVALUE(ColumnForChart)
VAR SalesFormatted = FORMAT(MeasureForBar, "#,#")

VAR DonutChart =
"<svg width='50' height='50' viewBox='0 0 42 42'>
<circle cx='21' cy='21' r='15' fill='none' stroke='lightgrey' stroke-width='4'/>
<circle cx='21' cy='21' r='15' fill='none' stroke='#2196F3' stroke-width='4'
stroke-linecap='round' stroke-dasharray='" & AchievementRate * 100 & ",100' transform='rotate(-90 21 21)'/>
<text x='21' y='26' font-family='Arial' font-size='10' text-anchor='middle' fill='#333'>" &
FORMAT(AchievementRate, "0%") & "</text>
</svg>"
--公众号wujunmin
VAR BarChart =
"<div style='display: flex; align-items: center; width: 100%; gap: 10px;'>
<div style='flex-shrink: 0;'>" & DonutChart & "</div>
<div style='flex-grow: 1; position: relative;'>
<div style='height: 30px; background: #f0f0f0; border-radius: 15px; overflow: hidden;'>
<div style='height: 100%; width: " & SalesPercentage & "%; background: linear-gradient(90deg, #2196F3, #64B5F6);
border-radius: 15px 0 0 15px; display: flex; align-items: center; padding-left: 15px;
color: white; font-family: Arial; font-weight: bold; font-size: 15px;'>
" & CityName & " " & SalesFormatted & "
</div>
</div>
</div>
</div>"

RETURN BarChart

e.g. Measure = HTML_Bar_Ring('Store'[StoreID],[M.Sales],[M.Pct])