Делает ли это то, что вы хотите?
v = List /@ Range@5;
vT = Transpose[v];
vvT = v.vT;
v // MatrixForm
vT // MatrixForm
vvT // MatrixForm

Чтобы получить {1, 2, 3, 4, 5}
в {{1}, {2}, {3}, {4}, {5}}
, вы можете использовать любой из:
List /@ {1, 2, 3, 4, 5}
{ {1, 2, 3, 4, 5} }\[Transpose]
Partition[{1, 2, 3, 4, 5}, 1]
Вы можете найти один из них более удобным, чем другие. Обычно в длинных списках вы найдете Partition
самым быстрым.
Кроме того, ваша конкретная операция может выполняться различными способами:
x = {1, 2, 3, 4, 5};
Outer[Times, x, x]
Синтаксически самое короткое:
![{Range@5}; %[Transpose].%](https://i.stack.imgur.com/a40GV.png)