\documentclass{standalone}
\standaloneconfig{margin=0.5cm}

\usepackage{tikz}
\usetikzlibrary {decorations.markings}

\tikzset{
    pctnode/.style={decoration={markings, mark=at position -3mm with{\node[white]{$#1\%$};}}, postaction=decorate},
    sgnpos1/.style={below=-6mm},
    sgnpos-1/.style={above=-6mm},
    sgncol1/.style=blue,
    sgncol-1/.style=red
}

\newcommand{\horscale}{1.7}
\newcommand{\verscale}{.7}
\newcommand{\mygraph}[2][]{
    \begin{tikzpicture}
        \foreach \p/\l[count=\n, evaluate=\p as \lbl using sign(\p)] in {#2}{
            \draw[line width=\horscale*9mm, sgncol\lbl, pctnode=\p] (\horscale*\n,\p/10*\verscale)--(\horscale*\n,0)
                node[align=center, sgncol\lbl, font=\tiny, sgnpos\lbl, inner ysep=0pt]{\l};
        }
    \end{tikzpicture}
}

\begin{document}

\mygraph{+32/RETRIEVAL\\ACCURACY, +38/USAGE, +83/INITIAL\\LEARNING, +90/SUPERVISOR\\QUESTIONS, -54/ERROR\\RATES, -50/READING\\TIME, -30/NUMBER OF\\WORDS}

\end{document}