I am not familiar with wiki (wich one?) but here is the code without
line-break
--- 8< --------------------------
%\usepackage{Sweave}
\RequirePackage[T1]{fontenc}
\RequirePackage{graphicx,ae,fancyvrb}
\IfFileExists{upquote.sty}{\RequirePackage{upquote}}{}
\setkeys{Gin}{width=0.8\textwidth}
%\DefineVerbatimEnvironment{Sinput}{}{}
%\DefineVerbatimEnvironment{Soutput}{}{}
\DefineVerbatimEnvironment{Scode}{Verbatim}{fontshape=sl}
\newenvironment{Schunk}{}{}
\usepackage{listings}
\definecolor{gris90}{gray}{0.90}
\lstloadlanguages{R}
\lstnewenvironment{Sinput}[1][]{
\lstset{%
language={R},
%%% print whole listing small
basicstyle=\small,
%%% style for keyword
keywordstyle=\color{black}\bfseries,
%%% define a list of word to emphasis
emph={in},
%%% define the way to emphase
emphstyle=\color{black}\bfseries,
%%% define a second list of word to emphasis
% emph={[2]out},
%%% define the way to emphase the list 2
% emphstyle=[2]\color{red}\bfseries,
%%% box arround the code
frame=single,
% background color
backgroundcolor=\color{gris90},
%%% define the style of the comments
% commentstyle=\color{gris10},
%%% show the space in code, or not
showspaces=false,
%%% style of the string (like "hello word")
stringstyle=\ttfamily,
%%% show the space in string, on not
showstringspaces=false,
#1
}
}{}
\lstnewenvironment{Soutput}[1][]{
\lstset{%
language={R},
%%% print whole listing small
basicstyle=\small,
%%% style for keyword
keywordstyle=\color{black}\bfseries,
%%% define a list of word to emphasis
emph={in},
%%% define the way to emphase
emphstyle=\color{black}\bfseries,
%%% define a second list of word to emphasis
% emph={[2]out},
%%% define the way to emphase the list 2
% emphstyle=[2]\color{red}\bfseries,
%%% box arround the code
frame=single,
%%% background color
backgroundcolor=\color{gris90},
%%% define the style of the comments
% commentstyle=\color{gris10},
%%% show the space in code, or not
showspaces=false,
%%% style of the string (like "hello word")
stringstyle=\ttfamily,
%%% show the space in string, on not
showstringspaces=false,
#1
}
}{}
--- 8< --------------------------
--
View this message in context:
http://r.789695.n4.nabble.com/Sweave-Changing-the-background-color-adding-a-border-tp885716p3731285.html
Sent from the R help mailing list archive at Nabble.com.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
