Here is another idea.
By choosing a better font and symbol combination, you might be able to get 
something close to the desired effect.

plot_ohlc2=: 3 : 0
 ''plot_ohlc2 y
:
 hl=. 1 2{y
 oc=. 0 3{y
 ntics=. {:$hl
 NB. oc=. (2#i.ntics);oc
 pd 'reset'
 pd 'xticpos ',": i.ntics
 pd x
 pd 'type symbol'
 pd 'symbolfont Arial Bold 12'
 pd 'symbols ><'
 pd oc
 pd 'type hilo'
 pd 'color red'
 pd hl
 pd 'show'
)

> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On Behalf Of Brian Schott
> Sent: Friday, 21 November 2008 17:50
> To: General forum
> Subject: Re: [Jgeneral] Stock chart plotting
>
> A slight improvement is suggested below. The pensize 5 makes the
> markers visible on my Mac, perhaps the increased pensize is not needed
> on windows.
>
> plot_ohlc=: 3 : 0
>  ''plot_ohlc y
> :
>  hl=. 1 2{y
>  oc=. 0 3{y
>  ntics=. {:$hl
>  oc=. ,|:oc
>  oc=. (2#i.ntics);oc
>  pd 'reset'
>  pd 'xticpos ',": i.ntics
>  pd x
>  pd 'pensize 5'
>  pd 'type point'
>  pd 'markers plus'
>  pd oc
>  pd 'type hilo'
>  pd 'color red'
>  pd hl
>  pd 'show'
> )
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to