Ygthkb

I can wrap in ARTICLE, but not in EXAM. How to wrap in EXAM?
(Question Plus-if you´re a LaTeX master-.- What´s the mosr suitable and easy package to do this kind of things?)

I can wrap a figure in an ARTICLE document

with this code

documentclass[12pt]{article}

usepackage{graphicx,wrapfig,lipsum}

usepackage[onehalfspacing]{setspace}

usepackage{mwe}



begin{document}

%begin{questions}

    begin{wrapfigure}{r}{.3linewidth}

    centering

    includegraphics[width=linewidth]{example-image-a.png}

    caption{This is A}

end{wrapfigure}

Hello, I want to wrap this figure in exam

lipsum[2]lipsum[1]

%end{questions}

end{document}

BUT I´d like wrap images in EXAM documents, and this code doesn´t give the wrapped figure:

documentclass[12pt]{exam}

usepackage{graphicx,wrapfig,lipsum}

usepackage[onehalfspacing]{setspace}

usepackage{mwe}



begin{document}

begin{questions}

begin{wrapfigure}{r}{.3linewidth}

    centering

    includegraphics[width=linewidth]{example-image-a.png}

    caption{This is A}

end{wrapfigure}

question Hello, I want to wrap this figure in exam

lipsum[2]lipsum[1]



end{questions}

end{document}

wrapfig doesn't work in lists, and questions is just another version of a list. The following is a quick and dirty reimplementation of https://tex.stackexchange.com/a/453624/117050 to work with enumerate like lists instead of with itemize. It uses insbox just like @Bernard's answer, but shouldn't require a manual paragraph. It does only implement the code to wrap inside one question, not inside the next one, too.

EDIT: It now should support exam's points system, but I didn't test it thoroughly. You might come back and complain if it doesn't work out.

EDIT2: Streamlined the interface to be more like the one of InsertBoxR, the new macro's name is questionInsbox and it takes an optional argument, two mandatory ones, and a second optional one. The first optional argument is like the one of question, the two mandatory arguments and the following optional one are like those of InsertBoxR.

documentclass[12pt]{exam}

usepackage{graphicx,wrapfig,lipsum}

input{insbox}

usepackage{capt-of}

usepackage[onehalfspacing]{setspace}

usepackage{mwe}



usepackage{etoolbox}



makeatletter

%% Stealing some code from exam:

defmypointshandling

  {%>>>

    if@bonus

      defpadded@point@block{%

        begingroup

          @placepointstrue

          bonuspoint@block

        endgroup

      }%

    else

      defpadded@point@block{%

        begingroup

          @placepointstrue

          point@block

        endgroup

      }%

    fi

    if@pointsdropped

    else

      if@bonus

        if@bonusqformat

          ifxques@ref@queslevel

          else

            setup@point@toks

          fi

        else

          setup@point@toks

        fi

      else

        if@qformat

          ifxques@ref@queslevel

          else

            setup@point@toks

          fi

        else

          setup@point@toks

        fi

      fi

    fi

    global MyIfPointsfalse

  }%<<<

newififMyIfPoints

protecteddefquestionInsbox

  {%

    @ifnextchar[questionInsbox@a{questionInsbox@a[]}%

  }

protectedlongdefquestionInsbox@a[#1]#2#3%

  {%

    @ifnextchar[{questionInsbox@b{#1}{#2}{#3}}

      {questionInsbox@b{#1}{#2}{#3}[0]}

  }

longdefquestionInsbox@b#1#2#3[#4]%

  {%

    apptocmd@itemlabel{hskipleftmargin}{}{}%

    defmakelabel##1{hssllap{##1}}%

    ifrelaxdetokenize{#1}relax

      question

    else

      globalMyIfPointstrue

      patchcmd@readpoints{global@placepointstrue}{relax}{}{}%

      question[#1]%

      patchcmd@readpoints{relax}{global@placepointstrue}{}{}%

    fi

    patchcmd@itemlabel{hskipleftmargin}{}{}{}%

    letmakelabel@mklab

    mbox{}%

    vspace*{-baselineskip}%

    setlength{leftskip}{leftmargin}%

    InsertBoxR{#2}{hskip-leftmargin#3hskipleftmargin}[#4]%

    ifMyIfPoints

      mypointshandling

    fi

    thepoint@toks

    ignorespaces

  }

makeatother



begin{document}

begin{questions}

  questionInsbox[5]{0}

    {%

      parbox[t]{.3linewidth}

        {%

          centering

          includegraphics[width=linewidth]{example-image-a.png}

          captionof{figure}{This is A}%

        }%

    }[1]

Hello, I want to wrap this figure in exam

lipsum[2]lipsum[1]



question[5] Hello, I want to wrap this figure in exam

lipsum[2]lipsum[1]

end{questions}

end{document}

Here is a solution with caption and the plain TeX insbox macro package. It defines a InsertBoxR command, to be inserted at the very beginning of a paragraph, which takes two mandatory arguments: the number of untouched lines before a box id inserted, and the inserted box itself. In addition, in case TeX has a wrong computation of number of the necessary shorter lines, it accepts as an optional argument the number of supplementary shorter lines that you want.

documentclass[12pt]{exam}

usepackage{graphicx,wrapfig,lipsum}

usepackage[onehalfspacing]{setspace}

usepackage{mwe}

usepackage{caption}

input{insbox}



begin{document}



begin{questions}

question

Hello, I want to wrap this figure in exam. par

InsertBoxR {0}{parbox{0.3linewidth}{includegraphics[width=linewidth]{example-image-a.png}captionof{figure}{This is A}}}[3]

lipsum[2]lipsum[1]

end{questions}



end{document}