test/graphics_pdf_commentを修正
[makefiles.git] / R_mk / R.mk
index c1f021c..1fed9c1 100644 (file)
--- a/R_mk/R.mk
+++ b/R_mk/R.mk
@@ -8,10 +8,10 @@ SED := sed
 
 RFLAG = --slave --vanilla
 
-# read.table文で読み込まれるtableファイル
+# read.table文で読み込まれるファイル
 tablefiles = $(strip $(shell $(SED) -n -e 's/.*read\.table."\(.*\)".*;/\1/gp' $<))
 
-# source文で読み込まれるtableファイル
+# source文で読み込まれるファイル
 sourcefiles = $(strip $(shell $(SED) -n -e 's/.*source."\(.*\)".*;/\1/gp' $<))
 
 # used by R postscript device.
@@ -34,11 +34,11 @@ psfamily ?= Japan1
       $(ECHO) '# Source Files'; \
       $(ECHO) '$(subst .R,.eps,$<) $(subst .R,.png,$<) $(subst .R,.jpeg,$<): $(sourcefiles)') >>$@)
 
-# 変数TARGETSで指定されたターゲットファイルに対応するdファイルをインクルード
-# .dファイルからヘッダファイルの依存関係を取得する
-# ã\82¿ã\83¼ã\82²ã\83\83ã\83\88ã\81« clean ã\81\8cå\90«ã\81¾ã\82\8cã\81¦ã\81\84ã\82\8bå ´å\90\88ã\81¯é\99¤ã\81\8f
-ifeq (,$(filter %clean,$(MAKECMDGOALS)))
-  -include $(addsuffix .d,$(basename $(TARGETS)))
+# ターゲットがclean で終わるもの以外の場合、
+# RTARGETSで指定されたファイルに対応するdファイルをインクルードし、
+# ã\83\98ã\83\83ã\83\80ã\83\95ã\82¡ã\82¤ã\83«ã\81®ä¾\9då­\98é\96¢ä¿\82ã\82\92å\8f\96å¾\97ã\81\99ã\82\8b
+ifeq (,$(filter %clean %d,$(MAKECMDGOALS))))
+  -include $(addsuffix .d,$(basename $(RTARGETS)))
 endif
 
 %.eps.R: %.R
@@ -49,8 +49,13 @@ endif
 %.eps: %.eps.R
        $(R) $(RFLAG) <$<
 
-%.pdf: %.eps
-       $(EPSTOPDF) $<
+# %.pdf: %.eps
+#      $(EPSTOPDF) $<
+
+%.pdf.R: %.R
+       @$(ECHO) 'pdf("$(subst .R,.pdf,$<)", family="Japan1")' >$@
+       @$(CAT) $< >>$@
+       @$(ECHO) 'invisible(dev.off())' >>$@
 
 %.png.R: %.R
        @$(ECHO) 'png("$(subst .R,.png,$<)")' >$@
@@ -62,13 +67,16 @@ endif
        @$(CAT) $< >>$@
        @$(ECHO) 'invisible(dev.off())' >>$@
 
-# install.packages("RSVGTipsDevice")
+# install.packages("RSvgDevice")
 %.svg.R: %.R
-       @$(ECHO) 'library("RSVGTipsDevice")' >$@
-       @$(ECHO) 'devSVGTips("$(subst .R,.svg,$<)")' >>$@
+       @$(ECHO) 'library("RSvgDevice")' >$@
+       @$(ECHO) 'devSVG("$(subst .R,.svg,$<)")' >>$@
        @$(CAT) $< >>$@
        @$(ECHO) 'invisible(dev.off())' >>$@
 
+%.pdf: %.pdf.R
+       $(R) $(RFLAG) <$<
+
 %.png: %.png.R
        $(R) $(RFLAG) <$<