CONV=perl -MEncode -p -i -e \
	's\#/Title \((.*?)\)\#$$x=$$1;\
				$$x=~s/\\&/&/g;\
				Encode::from_to($$x,"euc-jp","UTF-16");\
				"/Title <".unpack("H*",$$x).">"\
				\#eg'

TEX = platex
R = R

.SUFFIXES:
.SUFFIXES:.Rnw .tex .dvi .ps .pdf

.Rnw.tex:
	echo "options(width=60);Sweave(\"$<\")"| $(R) -q --no-save --no-restore
	echo "options(width=60);Stangle(\"$<\")"| $(R) -q --no-save --no-restore

.tex.dvi:
	platex $*
	jbibtex $*
	platex $*
	platex $*

.dvi.ps:
	dvips -t a4 $<
	$(CONV) $(@:%.dvi=%.ps)

.ps.pdf:
	ps2pdf14 -dNOKANJI -sPAPERSIZE=a4 $<

all:	RdeDDBJ2.pdf

touch:
	touch RdeDDBJ2.Rnw