r - XTS プロットにテキストが表示されない

Question

xtsを使用して R の時系列データのプロットにテキストを追加するのに問題があります。問題の簡単な例を作成しました。

私のtext()コマンドは何もしないようですが、プロットにポイントを追加できます。可能な限りデフォルトを使用して、コードをシンプルに保つようにしました

require(quantmod)

# fetch the data and plot it using default options
getSymbols('MKS.L')
plot(MKS.L$MKS.L.Close)

# try to add text - doesn't appear
text(as.Date('2012-01-01'),y=500,"wobble", cex=4)

# add a point - this does appear
testPos <- xts(600, as.Date('2012-01-01'))
points( testPos, pch = 3, cex = 4, col = "red" )

どんな助けにも感謝します-私はRにかなり慣れていないので、これに何時間も費やしました!