이런 식으로 시도하십시오. 약간의 운과 작은 글꼴로 각 보고서는 한 페이지에 유지됩니다...
// use the journal to accumulate the reports.
// if they fit on a single page, the page count will be correct.
dt = Open( "$sample_data/big class.jmp", "invisible" );
report = dt << Distribution( Continuous Distribution( Column( :weight ) ), Nominal Distribution( Column( :age ) ) );
report << journal;
report << closewindow;
report = Bivariate( Y( :weight ), X( :height ), Fit Line );
report << journal;
report << closewindow;
report = Oneway( Y( :height ), X( :sex ), Means( 1 ), Mean Diamonds( 1 ) );
report << journal;
report << closewindow;
Close( dt, nosave );
// add the header and page breaks to the journal
j = Current Journal();
listOfReports = j << child;
nReports = N Items( listOfReports );
// add page breaks
For( i = N Items( listOfReports ), i >= 1, i--,
Insert Into( listOfReports, Page Break Box(), i )
);
// and the header
headerPage = V List Box(
Text Box( "Big Report" ),
Text Box( Format( Today(), "yyyy-mm-dd" ) ),
Text Box( Char( nReports ) || " pages (reports)" )
);
Insert Into( listOfReports, headerPage, 1 );
// make the PDF from the journal
j<<SAVEPDF></SAVEPDF>
Firefox를 사용하여 PDF를 열었습니다.
편집: 당신도 이것을 원할 수 있습니다:
// make the PDF from the journal
j << setwindowtitle( " " ); // hide the title with a space
j << setpagesetup( {Margins( {0.75, 0.75, 0.75, 0.75} ), Scale( 1 ), Portrait( 1 ), Paper Size( "Letter" )} );
j << savePDF( "$desktop/report.pdf" );
페이지 설정이 도움이 될 수 있으며 창 제목을 정리하면 훨씬 보기 좋아집니다!
@davidbarbour
