Соединение точек на графике [Mathematica]

[Smoker]

Доброго времени суток, вкратце опишу свой вопрос: Я построил объединенный параметрический график 2-х функций (см. код), на нем отметил значение функции с шагом t=540 (у меня таких точек получилось по 20 штук на каждом графике). Можно ли как-нибудь соединить 1-ю точку на 2ом графике с 1-ой точкой на первом (окружности), а ее в свою очередь с началом координат?

x[1] = l*Cos[\[Phi]1[t]];
x[2] = l*Cos[\[Phi]1[t]] + l2*Cos[\[Phi]2[t]];
y[1] = l*Sin[\[Phi]1[t]];
y[2] = l*Sin[\[Phi]1[t]] + l2*Sin[\[Phi]2[t]];

{h} = x[1] /. Resh2
{j} = y[1] /. Resh2
{h1} = x[2] /. Resh2
{j1} = y[2] /. Resh2

pp = ParametricPlot[{{h1, j1}, {h, j}}, {t, 0, 10800}]

gg = Graphics[Point[Table[{h, j}, {t, 0, 10800, 540}]]]
g = Graphics[Point[Table[{h1, j1}, {t, 0, 10800, 540}]]]

Show[{pp, gg, g}]

[Aritaborian]

Графическим примитивом Line. Потом объединить картинки с помощью Show.

[Smoker]

Aritaborian в сообщении #923886 писал(а):

Графическим примитивом Line. Потом объединить картинки с помощью Show.

Про лайн вкурсе, но как его применить в данном случае не представляю

[Mysterious Light]

Graphics[Table[Line[{h, j}, {h1, j1}, {0, 0}], {t, 0, 10800, 540}]]

не работает?

[Smoker]

Mysterious Light в сообщении #923897 писал(а):

Graphics[Table[Line[{h, j}, {h1, j1}, {0, 0}], {t, 0, 10800, 540}]]

не работает?

нет

[Aritaborian]

Выдаёт ошибку? Ничего не рисует?