getJavaAppClassPath("cloudRmpi")
ppe.launchNetworkManager
cmd <- paste("java -classpath ", getJavaAppClassPath("cloudRmpi"),
" cloudrmpi.ROmpiPPEManager", " ppeManagerPort=",
port=4461, sep = "")
cmd
cmd
source('~/h/ppe/projects/rreval_201202/src/rreval_r/CreatePackageSkeleton.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
remove.packages(c("rreval","cloudRmpi"))
install.packages("/home/moi/h/ppe/rreval_package_factory/rreval_1.0.tar.gz")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
ppe.launchNetworkManager()
install.packages("/home/moi/h/ppe/rreval_package_factory/rreval_1.0.tar.gz")
source('~/h/ppe/projects/rreval_201202/src/rreval_r/CreatePackageSkeleton.R')
install.packages("/home/moi/h/ppe/rreval_package_factory/rreval_1.0.tar.gz")
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.startClient()
re(1+1)
ppe.shutdown()
ppe.startClient()
ppe.shutdown()
showConnections()
closeAllConnections()
rm(conManagerEnv)
ppe.launchNetworkManager()
ppe.startClient()
rm(conManagerEnv)
closeAllConnections()
ppe.launchNetworkManager()
ppe.startClient()
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.startClient()
ppe.getMasterNodeURL()
U=ppe.getMasterNodeURL()
pemFile <- sendCmdToNetworkManager(cmdName="getPemFile")
pemFile
rre.startClient(hostName=U,userName="ec2-user",pemFile=pemFile)
rre.startClient
clientAppIsRunning(portRJ=4460,3)
clientAppIsRunning(portRJ=4460, timeou=3)
clientAppIsRunning(portRJ=4460, timeout=3)
args(clientAppIsRunning)
clientAppIsRunning(port=4460, timeout=3)
launchRReClientApp(portR=4460)
conApp <- getOpenCon(hostName = U, userName = "ec2-user")
conApp
showConnections()
verbose <- TRUE
launchRReClientApp(portR=4460)
ls(conManagerEnv)
ls(envir=conManagerEnv)
conApp <- connectToClientApp(port = 4460, timeout = 3)
conApp
cmdC <- createAppConnectCommand(hostName = U, userName = "ec2-user",
portRJ = 4460, portJJ =4464 , pemFile = pemFile)
cmdC
mr <- sendAppCmd(con = conApp, cmd = cmdC)
mr
U
pemFile
remove.packages(c("rreval","cloudRmpi"))
source('~/h/ppe/projects/rreval_201202/src/rreval_r/CreatePackageSkeleton.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
install.packages("/home/moi/h/ppe/rreval_package_factory/rreval_1.0.tar.gz")
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
library(cloudRmpi)
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
sendCmdToNetworkManager
install.packages("RWeka")
source('~/h/ppe/projects/cloudRmpiJars_201202/src/CreatePackageSkeleton.R')
source('~/h/ppe/projects/cloudRmpiJars_201202/src/CreatePackageSkeleton.R')
install.packages("/home/moi/h/ppe/cloudRmpiJars_package_factory/cloudRmpiJars_1.0.tar.gz")
library(cloudRmpiJars)
removePackages("cloudRmpiJars")
remove.packages("cloudRmpiJars")
source('~/h/ppe/projects/cloudRmpiJars_201202/src/CreatePackageSkeleton.R')
install.packages("/home/moi/h/ppe/cloudRmpiJars_package_factory/cloudRmpiJars_1.0.tar.gz")
library(cloudRmpiJars)
library(rreval)
getJavaAppClassPath
getJavaAppClassPath()
getJavaAppClassPath("cloudRmpi")
getJavaAppClassPath("rreval")
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
remove.packages(rreval)
remove.packages("rreval"")
""
remove.packages("rreval")
remove.packages("cloudRmpiJars")
source('~/h/ppe/projects/cloudRmpiJars_201202/src/CreatePackageSkeleton.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
install.packages("rreval")
install.packages("/home/moi/h/ppe/cloudRmpiJars_package_factory/cloudRmpiJars_1.0.tar.gz")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
source('~/h/ppe/projects/cloudRmpiJars_201202/src/CreatePackageSkeleton.R')
source('~/h/ppe/projects/cloudRmpiJars_201202/src/CreatePackageSkeleton.R')
install.packages("/home/moi/h/ppe/cloudRmpiJars_package_factory/cloudRmpiJars_1.0.tar.gz")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
ppe.startClient()
remove.packages("cloudRmpi")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.shutdown()
ppe.shutdown()
showConnections()
library(cloudRmpi)
ppe.launchNetworkManager()
showConnections()
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
ppe.launchNetworkManager()
closeAllConnections()
ppe.launchNetworkManager()
ppe.launchNetworkManager()
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
q()
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
remove.packages("cloudRmpi")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
ppe.launchNetworkManager()
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
remove.packages("cloudRmpi")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
ppe.launchNetworkManager()
remove.packages("cloudRmpi")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.launchNetworkManager()
ppe.startClient()
showConnections()
library(cloudRmpi)
ppe.startClient()
re(1+1)
ppe.shutdown()
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.startClient()
re(1+1)
ppe.shutdown()
q()
library(cloudRmpi)
ppe.launchNetworkManager()
showConnections()
ppe.launchNetworkManager
connectToNetworkManager
conToNM
connectToApp
socketConnection
isGoodCon
isOpenEh
isOpen
conToNM
connectToApp
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
ppe.shutdown()
ppe.launchNetworkManager()
connectToNetworkManager
getConNetworkManager
close(con=NULL)
showConnections()
conToMM
conToNM
connectToNetworkManager
getConNetworkManager
conToNM
closeEh
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
q()
library(cloudRmpi)
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
ppe.launchNetworkManager()
ppe.startClient()
showConnections()
ppe.startClient()
re(1+1)
re(1+3)
re(ls())
re(system("uname -a"))
re(getwd()
)
re(getwd())
re(list.files())
setwd("/home/ec2-user")
re(setwd("/home/ec2-user"))
re(list.files())
ppe.getMasterNodeURL()
rreServer
setWorkingDir
getwd()
setwd("ro-user")
setwd("/home/ro-user")
ppe.shutdown()
ppe.launchNetworkManager()
ppe.startClient()
ppe.getMasterNodeURL()
ppe.getMasterNodeURL()
showConnections()
ppe.shutdown()
ppe.launchNetworkManager()
showConnections()
ppe.getMasterNodeURL()
ppe.getMasterNodeURL(networkName="moi-20120321")
ppe.shutdown()
ppe.launchNetworkManager()
ppe.getMasterNodeURL()
q()
library(cloudRmpi)
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
ppe.launchNetworkManager()
ppe.startClient()
ppe(1+1)
re(1+1)
re(getwd())
re(list.files())
ppe.shutdown()
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
remove.packages("cloudRmpi")
install.packages("/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.0.tar.gz")
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.launchNetworkManager
connectToNetworkManager
ppe.startClient()
re(1+1)
re(getwd())
re(list.files())
re(library(np))
re(library(npRmpi))
createSlaves
re(mpi.spawn.Rslaves(nslaves=6))
ppe.shutdown()
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
remove.packages("rreval")
install.packages("rreval")
install.packages("rreval")
fix(draw.position)
remove.packages(c("rreval","cloudRmpi","cloudRmpiJars"))
install.packages("cloudRmpi")
library(cloudRmpi)
ppe.launchNetworkManager()
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.getMasterNodeURL()
library(cloudRmpi)
ppe.launchNetworkManager()
library(cloudRmpi)
ppe.launchNetworkManager()
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
getClassPath()
library(cloudRmpi)
getClassPath()
ppe.launchNetworkManager()
ppe.launchNetworkManager()
.Platform$OS.type
getClassPath
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/PPEClient.R')
getClassPath
getJavaAppClassPath
library(cloudRmpi)
getJavaAppClassPath
getClassPath
getClassPath
cp
gsubfn
z <- .find.package(packageName)
z <- .find.package("cloudRmpi")
z
sub("/","\\",z)
sub("/","\\\",z)
""
)
""
sub("/","\\\\",z)
gsub("/","\\\\",z)
gsub("/","\\",z)
gsub("/","\\\\",z)
getJavaAppClassPath <- function(packageName) {
pkPath <- .find.package(packageName);
cp <- paste(packageName,"/jars/*");
if ( .Platform$OS == "windows" )
cp <- gsub("/","\\\\",cp);
cp
}
getJavaAppClassPath("cloudRmpi")
getJavaAppClassPath <- function(packageName) {
pkPath <- .find.package(packageName);
cp <- paste(packageName,"/jars/*",sep="");
if ( .Platform$OS == "windows" )
cp <- gsub("/","\\\\",cp);
cp
}
getJavaAppClassPath("cloudRmpi")
.find.package("cloudRmpi")
ppe.getMasterNodeURL
ppe.startClient
rre.startClient]
rre.startClient
getJavaAppClassPath("cloudRmpi")
source('~/h/ppe/projects/rreval_201202/src/rreval_r/MessageNio.R', echo=TRUE)
getJavaAppClassPath <- function(packageName) {
pkPath <- .find.package(packageName);
cp <- paste(pkPath,"/jars/*",sep="");
if ( .Platform$OS == "windows" )
cp <- gsub("/","\\\\",cp);
cp
}
getJavaAppClassPath("cloudRmpi")
source('~/h/ppe/projects/rreval_201202/src/rreval_r/MessageNio.R', echo=TRUE)
source('~/h/ppe/projects/rreval_201202/src/rreval_r/MessageNio.R', echo=TRUE)
source('~/h/ppe/projects/rreval_201202/src/rreval_r/MessageNio.R', echo=TRUE)
source('~/h/ppe/projects/rreval_201202/src/rreval_r/MessageNio.R')
getJavaAppClassPath("cloudRmpi")
gsub("/","\\\\",getJavaAppClassPath("cloudRmpi"))
getJavaAppClassPath <- function(packageName,quoted=TRUE) {
pkPath <- .find.package(packageName);
cp <- paste(pkPath,"/jars/*",sep="");
if ( .Platform$OS == "windows" )
cp <- gsub("/","\\\\",cp);
if ( quoted ) paste("\"",cp,"\"",sep="")
else cp
}
getJavaAppClassPath("cloudRmpi")
getJavaAppClassPath("cloudRmpi",quoted=FALSE)
getClassPath <- function() {
cp <- paste(getJavaAppClassPath("cloudRmpi",quoted=FALSE),
getJavaAppClassPath("cloudRmpiJars",quoted=FALSE),
sep=":"
);
paste("\"",cp,"\"",sep="")
}
getClassPath()
ppe.launchNetworkManager()
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
getJavaAppClassPath
getClassPath
ppe.launchNetworkManager()
reassignInPackage()
install.packages("R.utils")
library(R.utils)
reassignInPackage
help(reassignInPackage)
assignInNamespace
help(assignInNamespace)
assignInNamespace
getJavaAppClassPath
help(.Platform)
Sys.info
help(Sys.info)
Sys.info()
Sys.info()$user
Sys.info()["user"]
ppe.getNetworkNames
x <- c("aaa vvv-1234 aaa vvv-1235")
match("aaa vvv",x)
match("aaa vvv",c(x))
grep(pattern="aaa vvv",x=x)
x
pat
pat <- "aaa vvv"
gsub(pattern=" ",replacement="_",x="aaa vvv")
user <- "Barnet Wagman"
user.ns <- gsub(pattern=" ",replacement="#^",x=user)
user.ns <-
xfg
user.ns <- gsub(pattern=" ",replacement="#^",x=user)
user.ns
x
x1 <- "Barnet Wagman-1234"
x2 <- "Barnet Wagman-1234 Barnet Wagman-1235"
x1
x2
gsub(pattern=user,replacement=user.ns,x=x1)
gsub(pattern=user,replacement=user.ns,x=x1)
ppe.getNetworkNames
gsub(pattern=user,replacement=user.ns,x=x1)
strsplit(x=gsub(pattern=user,replacement=user.ns,x=x1),"split=" ")
""
strsplit(x=gsub(pattern=user,replacement=user.ns,x=x1),"split=" ")
)
""
strsplit(x=gsub(pattern=user,replacement=user.ns,x=x1),split=" ")
strsplit(x1," ")
strsplit(x=gsub(pattern=user,replacement=user.ns,x=x1),split=" ")
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
x1
parseNetworkNames(x1)
parseNetworkNames <- function(x) {
user <- Sys.info()["user"];
user.ns <- gsub(pattern=" ",replacement="#^",x=user);
xns <- gsub(pattern=user,replacement=user.ns,x=x);
z <- strsplit(x=xns,split=" ");
gsub(pattern=user.ns,replacement=user,x=z)
}
parseNetworkNames(x1)
gsub(pattern=user,replacement=user.ns,x=x2)
gsub(pattern=user,replacement=user.ns,x=x1)
xns <- gsub(pattern=user,replacement=user.ns,x=x1)
xns
z <- strsplit(x=xns,split=" ");
z
z <- unlist(strsplit(x=xns,split=" "));
z
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
parseNetworkNames(x1)
parseNetworkNames(x2)
length(parseNetworkNames(x1))
length(parseNetworkNames(x2))
xns
strsplit(x=xns,split=" ")
unlist(strsplit(x=xns,split=" "))
z <- unlist(strsplit(x=xns,split=" "))
z
length(z)
gsub(pattern=user.ns,replacement=user,x=z)
length(gsub(pattern=user.ns,replacement=user,x=z))
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
x1
parseNetworkNames(x1)
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
parseNetworkNames(x1,user="Barnet Wagman")
parseNetworkNames(x2,user="Barnet Wagman")
parseNetworkNames(x1,user="Barnet Wagman")
parseNetworkNames <- function(x,user) {
#user <- Sys.info()["user"];
user.ns <- gsub(pattern=" ",replacement="#^",x=user);
xns <- gsub(pattern=user,replacement=user.ns,x=x);
z <- unlist(strsplit(x=xns,split=" "));
print(z);
gsub(pattern=user.ns,replacement=user,x=z)
}
parseNetworkNames(x1,user="Barnet Wagman")
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
parseNetworkNames(x1,user="Barnet Wagman")
q <- parseNetworkNames(x1,user="Barnet Wagman")
q
gsub(pattern="Barnet#^Wagman",replacement="Barnet Wagman",x=q)
q
grep(pattern="Barnet#^Wagman",x=q)
q
gsub(pattern="Barnet#^Wagman",replacement="Barnet Wagman",x=q,fixed=TRUE)
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
parseNetworkNames(x1,user="Barnet Wagman")
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
parseNetworkNames(x1,user="Barnet Wagman")
parseNetworkNames(x2,user="Barnet Wagman")
parseNetworkNames(x1)
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
parseNetworkNames
parseNetworkNames(x1)
parseNetworkNames(x2)
ppe.getNetworkNames
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/cloudRmpi_windows_patch_1.R')
library(cloudRmpi)
ppe.launchNetworkManager()
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.launchNetworkManager()
library(cloudRmpi)
ppe.launchNetworkManager()
ppe.launchNetworkManager()
library(cloudRmpi)
ppe.launchNetworkManager()
library(cloudRmpi)
ppe.launchNetworkManager
getClassPath()
ppe.launchNetworkManager
ppe.launchNetworkManager()
10/0.01
(10/0.01)/10
(10/0.02)/10
(10/0.03)/10
library(cloudRmpi)
(10/0.01)
(10/0.03)
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
remove.packages("cloudRmpi")
install.packages(pkgs="/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.1.tar.gz",repos=NULL,dependencies=TRUE)
library(cloudRmpi)
ppe.launchNetworkManager()
remove.packages("cloudRmpi")
install.packages(pkgs="/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.1.tar.gz",repos=NULL,dependencies=TRUE)
ppe.launchNetworkManager()
source('~/h/ppe/projects/cloudRmpiJars_201202/src/CreatePackageSkeleton.R')
source('~/h/ppe/projects/cloudrmpi_201202/src/cloudrmpi_r/CreatePackageSkeleton.R')
remove.packages("cloudRmpi","cloudRmpiJars")
remove.packages("cloudRmpiJars")
remove.packages("rreval")
install.packages(pkgs="/home/moi/h/ppe/rreval_package_factory/rreval_1.1.tar.gz",repos=NULL,dependencies=TRUE)
install.packages(pkgs="/home/moi/h/ppe/cloudRmpiJars_package_factory/cloudRmpiJars_1.1.tar.gz",repos=NULL,dependencies=TRUE)
install.packages(pkgs="/home/moi/h/ppe/cloudRmpi_package_factory/cloudRmpi_1.1.tar.gz",repos=NULL,dependencies=TRUE)
