给你一个模拟数值 例子 在一个图中 作一条折线和 散点图
new;
library pgraph;
graphset;
n=100;
Seed1=12567;
seed2= 4555;
eps= rndns(n,1,seed1);
x1=rndus(n,1,seed2);
y=0.5 + 0.8*x1 +eps;
t = seqa(1,1,n);
title("Simulated data set");
_plctrl= { 0 0} ; /* connect points*/
_pltype = { 6 2}; /* type of curves */;
_pcolor={1 5};
_pbox= 15; /*draw a box around the graph*/
_pdate ="";
_plegctl = 1 ; /* create a legend box */
_plegstr = "y \000x1\00"; /* put names for the legend */
xlabel("time");
ylabel("y and x1");
xy(t,y~x1);