qtcon <- function(stream) UseMethod("qtcon")
qtcon.QIODevice <- function(stream, binary = FALSE) {
stopifnot(is(stream, "QIODevice"))
stopifnot(isTRUEorFALSE(binary))
.Call("qt_qtcon_QIODevice", stream, binary, PACKAGE="qtbase")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.