Как отформатировать два отдельных списка в столбцы, а не строки в Mathematica?

Кажется, это должно быть проще простого, но я не нашел ответа в документации по Mathematica. Скажем, у меня есть два отдельных списка, например x = {1,2,3,4,5} и y = {1,4,9,16,25}. Я хочу отформатировать эти списки в виде таблицы с каждым списком в виде столбца, например:

x  y  
1  1  
2  4  
3  9  
4 16  
5 25  

Но если я сделаю TableForm [x, y], Я получаю только первый столбец, например:

1  
2  
3  
4  
5  

Если я использую Grid [{x, y}], я получаю таблицу, но отформатированную как строки, а не столбцы, например:

1 2 3  4  5  
1 4 9 16 25   

Теперь, если у меня есть значения в виде пар {x, y}, а не отдельных списков, тогда я могу получить почти то, что хочу, например:

Input: Table[{n,n^2},{n,1,5}]//TableForm

Output:   
1 1  
2 4  
3 9  
4 16  
5 25  

Я говорю почти , потому что я хочу чтобы имена переменных были вверху каждого столбца, и я бы хотел, чтобы столбцы были выровнены так, чтобы цифры единиц всегда располагались вертикально в «разряде единиц», цифры десятков - в «разряде десятков» и т. д.

Итак, вернемся к моему вопросу: если у меня есть два отдельных списка одинаковой длины, как я могу отформатировать их как таблицу столбцов? Я проверил документацию MMA для Grid и TableForm, но не смог найти способ сделать это. Я что-то пропустил? Если нет прямого способа сделать это, есть ли способ преобразовать два отдельных списка в пары значений, которые затем можно было бы форматировать в столбцы с помощью TableForm?

Спасибо за любые предложения.