WolframAlpha["plot vector(1,1)+vector(2,3)", {{"Result", 1}, "Content"}]

[![enter image description here][1]][1]


To see the code behind you can take the first `Part`:

    WolframAlpha["plot vector(1,1)+vector(2,3)", {{"Result", 1}, "Content"}][[1]]

[![enter image description here][3]][3]

To get the main graphics, use

    WolframAlpha["plot vector(1,1)+vector(2,3)", {{"Result", 1}, "Content"}][[1, 1, 
       1, 1, 1]] // RawBoxes

[![enter image description here][4]][4]

and to get the legend use

    WolframAlpha["plot vector(1,1)+vector(2,3)", {{"Result", 1}, "Content"}][[1, 1, 
       1, 1, 2]] // RawBoxes

[![enter image description here][5]][5]

To get the result pane with special styling, use

    WolframAlpha["plot vector(1,1)+vector(2,3)", IncludePods -> "Result", 
     AppearanceElements -> {"Pods"}]

[![enter image description here][2]][2]


  [1]: https://i.sstatic.net/c2def.png
  [2]: https://i.sstatic.net/5SwHw.png
  [3]: https://i.sstatic.net/yz4hE.png
  [4]: https://i.sstatic.net/aa1YH.png
  [5]: https://i.sstatic.net/iGa3k.png