Question: pointplot arrays

Hi, I have 2 sets of data:

P := array([1.23, 1.15, 1.10, 1.20, 1.35, 1.25, 1.28, .99, 1.22, 1.25, 1.30, 1.05]);
Q := array([892, 1012, 1060, 987, 680, 739, 809, 1275, 946, 874, 720, 1096]);
p=P(t), q=Q(t) i.e. both p & q are a function of parameter t  t=1..12
 
2 functions: 
x=ln(p)
y=ln(q)
I'm trying to display x against y , ie x=ln(p) on the horizontal axis, y=ln(q) on the vertical
 
this is the code:
----------------------------------------------------------------------------------------------
with(plots);
q := array([892, 1012, 1060, 987, 680, 739, 809, 1275, 946, 874, 720, 1096]);
p := array([1.23, 1.15, 1.10, 1.20, 1.35, 1.25, 1.28, .99, 1.22, 1.25, 1.30, 1.05]);

 pointplot({seq([ln(p[t]), ln(q[t])], t = 1 .. 12)});
-----------------------------------------------------------------------------------------------------
but all I get is
pointplot({[-0.01005033585, ln(1275)], [0.04879016417, ln(1096)], 

[0.09531017980, ln(1060)], [0.1397619424, ln(1012)],

[0.1823215568, ln(987)], [0.1988508587, ln(946)], [0.2070141694, ln(892)],

[0.2231435513, ln(739)], [0.2231435513, ln(874)], [0.2468600779, ln(809)],

[0.2623642645, ln(720)], [0.3001045925, ln(680)]})

 
rather then the plot and even the answers don't seem to much
any ideas?
 
 
 
Please Wait...