Here is an example of one way to do what you want
Names Default To Here( 1 );
Bivariate( Y( :height ), X( :weight ), Fit Line( {Line Color( {212, 73, 88} )} ) );
theReport = Current Report();
theReport[Outline Box( 1 )] << prepend(
bb = Button Box( "Publish to File",
bb << visibility( "collapse" );
theReport << save interactive HTML( "$TEMP/jmp_example.html" );
bb << visibility( "visible" );
)
);
![txnelson_1-1673923846373.png txnelson_1-1673923846373.png](https://community.jmp.com/t5/image/serverpage/image-id/49164i3BBCA499FCB2715F/image-size/medium?v=v2&px=400)
![txnelson_0-1673923731616.png txnelson_0-1673923731616.png](https://community.jmp.com/t5/image/serverpage/image-id/49163i2196ABBCDD92B60C/image-size/medium?v=v2&px=400)
Jim