Steps 396, 399

ThisIsHtml

'
<style>
       .chart-wrap {
         margin-left: 50px;
         font-family: sans-serif;
         height: 650px;
         width: 300px;
       }
       .chart-wrap .title {
         font-weight: bold;
         font-size: 1.62em;
         padding: 0.5em 0 1.8em 0;
         text-align: center;
         white-space: nowrap;
       }
       .chart-wrap.vertical .grid {
         transform: translateY(-175px) translateX(175px) rotate(-90deg);
       }
       .chart-wrap.vertical .grid .bar::after {
         transform: translateY(-50%) rotate(45deg);
         display: block;
       }
       .chart-wrap.vertical .grid::before,
       .chart-wrap.vertical .grid::after {
         transform: translateX(-0.2em) rotate(90deg);
       }
       .chart-wrap .grid {
         position: relative;
         padding: 5px 0 5px 0;
         height: 100%;
         width: 100%;
         border-left: 2px solid #aaa;
         background: repeating-linear-gradient(90deg,transparent,transparent 19.5%,rgba(170,170,170,0.7) 20%);
       }
       .chart-wrap .grid::before {
         font-size: 0.8em;
         font-weight: bold;
         content: "0%";
         position: absolute;
         left: -0.5em;
         top: -1.5em;
       }
       .chart-wrap .grid::after {
         font-size: 0.8em;
         font-weight: bold;
         content: "100%";
         position: absolute;
         right: -1.5em;
         top: -1.5em;
       }
       .chart-wrap .bar {
         width: var(--bar-value);
         height: 50px;
         margin: 30px 0;
         background-color: #F16335;
         border-radius: 0 3px 3px 0;
       }
       .chart-wrap .bar:hover {
         opacity: 0.7;
       }
       .chart-wrap .bar::after {
         content: attr(data-name);
         margin-left: 100%;
         padding: 10px;
         display: inline-block;
         white-space: nowrap;
       }
       
       </style>

'+

'

<div class="chart-wrap vertical">
         <h2 class="title">Bar Chart for Cars and Brands</h2>
  
  <div class="grid">
       '+
       Car.allInstances->groupby(c|c.BrandOfCar)->collect(tuple|tuple.BrandOfCar.Name,(100*tuple.List->size/Car.allinstances->size).Round(0).asstring+'%')
       ->collect(values|'<div class="bar" style="--bar-value:'+values.Part2+';" data-name="'+values.Name+'" title="'+values.Name+' '+values.Part2+'"></div>'

)
->asSeparatedList( '' )+
'
  </div>
</div>'

Step 406

'
<style>
      h1 {
        font: 24px sans-serif;
      }
      .bar {
        fill: #d81c3f;
      }
      
      .bar:hover {
        fill: darkgray;
      }
      
      .axis {
        font: 10px sans-serif;
      }
      
      .axis path,
      .axis line {
        fill: none;
        stroke: #000;
        shape-rendering: crispEdges;
      }
      
      .x.axis path {
        display: none;
      }
      </style>

'+

'

<div class="chart-wrap vertical">
        <h2 class="title">Bar Chart for Cars and Brands</h2>
  
  <div class="grid">
      '+
      Car.allInstances->groupby(c|c.BrandOfCar)->collect(tuple|tuple.BrandOfCar.Name,(100*tuple.List->size/Car.allinstances->size).Round(0).asstring+'%')
      ->collect(values|'<div class="bar" style="--bar-value:'+values.Part2+';" data-name="'+values.Name+'" title="'+values.Name+' '+values.Part2+'"></div>'

)
->asSeparatedList( '' )+
'
  </div>
</div>'+

'<h1>SVG Vertical Bar Chart</h1>

<svg width="960" height="500">
	<g transform="translate(40,20)">
	<g class="x axis" transform="translate(0,450)">'+
let cars=Car.allInstances in
(
  cars->groupby(c|c.BrandOfCar)->collect(tuple|tuple.BrandOfCar.Name,(100*tuple.List->size/cars->size).Round(0).asstring+'%',BrandOfCar.allinstances->indexof(tuple.BrandOfCar)*35)
->collect(values|'
  		       <g class="tick" transform="translate('+values.Part3.asstring+',0)" style="opacity: 1;"><line y2="6" x2="0"></line>
			<text dy=".71em" y="9" x="0" style="text-anchor: middle;">'+values.Name+'</text>
		</g>


'

)
->asSeparatedList( '' )
)+

'
  		       
		<path class="domain" d="M0,6V0H900V6"></path>
	</g>
		<g class="y axis">
			<g class="tick" transform="translate(0,450)" style="opacity: 1;"><line x2="-6" y2="0"></line>
			<text dy=".32em" x="-9" y="0" style="text-anchor: end;">0%</text>
		</g>
			<g class="tick" transform="translate(0,212)" style="opacity: 1;"><line x2="-6" y2="0"></line>
			<text dy=".32em" x="-9" y="0" style="text-anchor: end;">50%</text>
		</g>
			<g class="tick" transform="translate(0,24.87009919697684)" style="opacity: 1;"><line x2="-6" y2="0"></line>
			<text dy=".32em" x="-9" y="0" style="text-anchor: end;">100%</text>
		</g>
		<path class="domain" d="M-6,0H0V450H-6"></path>
		<text transform="rotate(-90)" y="6" dy=".71em" style="text-anchor: end;">Frequency</text>
	</g>
'+
let cars=Car.allInstances in
(
  cars->groupby(c|c.BrandOfCar)->collect(tuple|tuple.BrandOfCar.Name,
                          (450*tuple.List->size/cars->size).Round(0),
                          BrandOfCar.allinstances->indexof(tuple.BrandOfCar)*35)
->collect(values|'
		<rect class="bar" x="'+values.Part3.asstring+'" width="31" y="'+values.Part2.asstring+'" height="'+(450-values.Part2).asstring+'"></rect>


'

)
->asSeparatedList( '' )
)+

'
</svg>'