BarChart[1~Table~6,BarOrigin->Left,ChartStyle->{Purple,Blue,Green,Yellow,Orange,Red},BarSpacing->0,Axes->False>0>1,ChartBaseStyle->EdgeForm[None]]>EdgeForm@None] ChartBaseStyle->EdgeForm[None]>EdgeForm@None removes the faint black lines that would normally separate each bar.
-3 bytes thanks to att.
BarChart[1~Table~6,BarOrigin->Left,ChartStyle->{Purple,Blue,Green,Yellow,Orange,Red},BarSpacing->0,Axes->False,ChartBaseStyle->EdgeForm[None]] ChartBaseStyle->EdgeForm[None] removes the faint black lines that would normally separate each bar.
BarChart[1~Table~6,BarOrigin->Left,ChartStyle->{Purple,Blue,Green,Yellow,Orange,Red},BarSpacing->0,Axes->0>1,ChartBaseStyle->EdgeForm@None] ChartBaseStyle->EdgeForm@None removes the faint black lines that would normally separate each bar.
-3 bytes thanks to att.
BarChart[1~Table~6,BarOrigin->Left,ChartStyle->{Purple,Blue,Green,Yellow,Orange,Red},BarSpacing->0,Axes->False,ChartBaseStyle->EdgeForm[None]] ChartBaseStyle->EdgeForm[None] removes the faint black lines that would normally separate each bar.
BarChart[1~Table~6,BarOrigin->Left,ChartStyle->{Purple,Blue,Green,Yellow,Orange,Red},BarSpacing->0,Axes->False,ChartBaseStyle->EdgeForm[None]]
BarChart[1~Table~6,BarOrigin->Left,ChartStyle->{Purple,Blue,Green,Yellow,Orange,Red},BarSpacing->0,Axes->False,ChartBaseStyle->EdgeForm[None]] ChartBaseStyle->EdgeForm[None] removes the faint black lines that would normally separate each bar.
BarChart[1~Table~6,BarOrigin->Left,ChartStyle->{Purple,Blue,Green,Yellow,Orange,Red},BarSpacing->0,Axes->False,ChartBaseStyle->EdgeForm[None]]