Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
cam@cam-ubuntu-home-server:~$ cat /etc/mdadm/mdadm.conf | |
# mdadm.conf | |
# | |
# !NB! Run update-initramfs -u after updating this file. | |
# !NB! This will ensure that initramfs has an uptodate copy. | |
# | |
# Please refer to mdadm.conf(5) for information about this file. | |
# | |
# by default (built-in), scan all partitions (/proc/partitions) and all |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env Rscript | |
try_require <- function(pkg){ | |
e <- try( | |
suppressPackageStartupMessages(library(pkg,character.only=TRUE)) | |
,silent=TRUE) | |
if(class(e) == 'try-error') | |
invisible(FALSE) | |
else | |
invisible(TRUE) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{ scopeName = 'source.r'; | |
fileTypes = ( 'R', 'r', 's', 'S', 'Rprofile' ); | |
foldingStartMarker = '^[^#]*(\([^\)]*$|\{\s*$)'; | |
foldingStopMarker = '(^\s*\)|^\s*\})'; | |
patterns = ( | |
{ name = 'comment.line.number-sign.r'; | |
match = "(#(?!').{1}).*$\n?"; | |
captures = { 1 = { name = 'punctuation.definition.comment.r'; }; }; | |
}, | |
{ name = 'storage.type.r'; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
\documentclass{article} | |
\usepackage{Sweave} | |
\usepackage{tikz} | |
\SweaveOpts{keep.source=TRUE,tidy=TRUE,concordance=TRUE} | |
\begin{document} | |
<<>>= | |
# Small function with highlight=TRUE and tidy=TRUE and some additional garbage....... |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
\documentclass{article} | |
\usepackage{tikz} | |
\usepackage[margin=1in]{geometry} | |
\title{Minimal pgfSweave Example} | |
\author{Cameron Bracken} | |
\renewenvironment{Hinput}{\begin{trivlist}\item\LARGE}{\end{trivlist}} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% | |
%% | |
%% This Beamer template was created by Cameron Bracken. | |
%% | |
%% Last Modified: April 9, 2011 | |
%% | |
%% This work is licensed under a Creative Commons Attribution 3.0 | |
%% Unported License (http://creativecommons.org/licenses/by/3.0/). | |
%% | |
%% Any versions last modified before April 9, 2011 carried this notice: |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Do not need to load this library but need it installed | |
# library(tm) | |
library(stringr) | |
# get dummy text | |
loremipsum <- system.file("texts", "loremipsum.txt", package = "tm") | |
#A really long single line comment | |
comment <- paste('#', paste(readLines(loremipsum),collapse='')) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
SRC=myRunifConcise.c randFortran.f90 randWrapper.c | |
all: | |
R CMD COMPILE FCFLAGS='-O2' $(SRC) | |
R CMD SHLIB $(SRC) -o myRand.so | |
clean: | |
rm *.o *.so |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
set.seed(101) | |
x <- c(rnorm(5000),rnorm(5000,4,1.5)) | |
y <- c(rnorm(5000),rnorm(5000,2,3)) | |
hb2 <- hexbin(x,y) | |
cr <- colorRampPalette(c('gray','blue')) | |
plot(hb2,colramp=cr,border=gray(.75)) | |
# Or no border, can't decide | |
# plot(hb2,colramp=cr) |