xtable output имеет нулевую длину при вызове из функции

Question

Я хочу вывести латексные версии моих таблиц. Я использую xtable() для этого, с одной большой проблемой. Когда я пытаюсь сгенерировать латексные таблицы из вызываемой мной функции (которая, как правило, также выполняет много других задач), файлы записываются с нулевой длиной! (Я использую Windows 7 x64 и использую R 2.11).

Пример:

fnc <- function (my.table) {
    sink(file="paper/tables/output.tex",caption="my caption")
    xtable(my.table)
    sink()
}

Когда я запускаю три строки внутри функции напрямую, файл записывается правильно. Когда я вызываю fnc(my.table), файл записывается как нулевая длина.

Зачем? Спасибо!

Answer 1

Вам нужно использовать print в функции:

print(xtable(my.table))