r - R mschart ライン スムージングをオフにする

Question

mschart バージョン 0.2.6 を使用して、Powerpoint の R で折れ線グラフを描画しています。デフォルトで滑らかな線が得られますが、それは望ましくありません。オフにするにはどうすればよいですか？

github で次の機能リクエストを見つけましたが、クローズされており、どのように解決されたのかわかりません: https://github.com/ardata-fr/mschart/issues/25

これが実際の例です：

library(officer)
library(mschart)

dat<-data.frame(Year=c(rep("2010",3), rep("2011",3), rep("2012",3)),
            Fruit=c(rep(c("Apples","Oranges","Pears"),3)),
            Count = c(332,229,168,
                      223,189,225,
                      321,378,261), stringsAsFactors=F)

line_chart <- ms_linechart(data = dat, x = "Year",y = "Count", group="Fruit")

doc <- read_pptx()
doc <- add_slide(doc, layout = "Title and Content", master = "Office Theme")
doc <- ph_with(x = doc, value = c("Fruit"),
             location = ph_location_type(type = "title") )
doc <- ph_with(doc, line_chart, location = ph_location_type(type="body"))
fileout <- "./Test.pptx" 
print(doc, target = fileout)

これがそれが生み出すものです。左下で [Smoothed Line] オプションがオンになっていることに注意してください。