Displaying 20 results from an estimated 4000 matches similar to: "The three-dot question"
2011 Jan 29
1
Spare matrix multiplication
Dear R,
I have a simple question concerning with a special case of spare matrix
multiplications. Say A is a 200-by-10000 dense matrix. B is a 10000-by-10000
block- diagonal matrix, and each diagonal block B_i is 100-by-100. The usual
way I did A%*%B will take about 30 seconds which is to time consuming
because I have to do this thousands of times. I also tried to partition A
into 100 small blocks
2011 Jan 12
2
How to disable using "enter" key to exit the browser in debugging mode
Dear R,
How can I disable using "enter" key to exit the browser() in debug mode? I
would love to have this option because it is so annoying to jump out of the
debugging mode unexpectedly when I don't want to. I guess some of us have
encouraged at least one of these situations,
1, Accidentally pressed the enter key within the browser.
2, Copy and paste a piece of debugging code
2011 Jan 18
2
Convert a matrix's columns to list
Dear R,
Is there an efficient way to make a list that each element is from the
corresponding column of a matrix. For example, if I have a matrix "a"
> a <- matrix(1:10, 5, 2)
> a
[,1] [,2]
[1,] 1 6
[2,] 2 7
[3,] 3 8
[4,] 4 9
[5,] 5 10
I would like to have a list "b" like this
> b <- list(a[, 1], a[, 2])
> b
[[1]]
[1] 1 2 3
2010 Oct 12
1
lapply to subsets
Dear R,
I have a silly question concerns with *apply. Say I have a list called A,
A <- list(a = array(1:20, c(2, 2, 5)), b = array(1:30, c(2, 3, 5)))
I wish to calculate the mean of A$a, and A$b w.r.t. their third dimension so
I did
lapply(A,apply,c(1,2),mean)
Now if I still wish to do the above task but take away some burn-in, e.g. do
not take A$a[,,1:2],and A$b[,,1:2] into account.
2010 Sep 24
3
boundary check
Dear R,
I have a covariates matrix with 10 observations, e.g.
> X <- matrix(rnorm(50), 10, 5)
> X
[,1] [,2] [,3] [,4] [,5]
[1,] 0.24857135 0.30880745 -1.44118657 1.10229027 1.0526010
[2,] 1.24316806 0.36275370 -0.40096866 -0.24387888 -1.5324384
[3,] -0.33504014 0.42996246 0.03902479 -0.84778875 -2.4754644
[4,] 0.06710229 1.01950917
2009 Nov 05
2
rm(list<-ls()) error
Dear R,
Why rm(list<-ls()) gives an error but rm(list=ls()) not?. I remember the
operator ‘<-’ can be used anywhere...
Thanks!
Feng
--
Feng Li
Department of Statistics
Stockholm University
106 91 Stockholm, Sweden
http://feng.li/
[[alternative HTML version deleted]]
2010 Jan 05
1
R-package related to the topic of INARMA models
Dear R,
I am looking for R-package related to INARMA (Integer-valued ARMA). Can
anyone give me some information? I did not get information from task view.
Many thanks.
Feng
--
Feng Li
Department of Statistics
Stockholm University
106 91 Stockholm, Sweden
http://feng.li/
[[alternative HTML version deleted]]
2011 Mar 23
1
R gui problem for windows
Dear R,
I rare use the standard R-gui on Windows. Yesterday I tried the latest
stable release on Windows 7 and XP and found one thing interesting. Assume
currently I am running R code, say
> example(plot)
Then I click the "close window" button on the R main window. R asks me to
save workspace image or not. Then I click "cancel". I suspect that my
program
2011 Feb 01
1
kmeans: number of cluster centres must lie between 1 and nrow(x)
Dear R,
Can't I cluster a dataset into k clusters where k is exactly the number of
observations? I have version 12.2 installed. See this example
> a <- matrix(1:100, 20)
> kmeans(a, 20)
Error: number of cluster centres must lie between 1 and nrow(x)
This is a bit ad-hoc but I known R from version 2.12 allows number of
clusters to be one. So I guess allowing number of clusters to be
2009 Feb 11
5
How to handle large numbers?
Dear R,
I have two questions:
1, Why both R and Matlab give 0*Inf==NaN? To my knowledge, it should be zero
mathematically. Am I right?
2, I need to calculate e.g. exp(a)/(exp(b)+c), where both a and b are very
large numbers (>>1000, e.g a=1000, b=1007, and c=5). R gives me NaN when I
use the following command:
> exp(1000)/(exp(1007)+5)
[1] NaN
I am pretty sure this should be close to
2009 Jun 20
2
Special characters in Rd example section will cause errors
Hi (Duncan?),
The other day I noticed some characters will cause errors in R CMD
CHECK because of parse_Rd(), and AFAIK, these chars include '%', '{'
and '}'. For example, note the comments in the example section:
%~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~%
\name{testfun}
\Rdversion{1.1}
\alias{testfun}
\title{
A Test
}
\description{
A test
}
\usage{
testfun()
}
\value{
NULL
}
2011 Jul 12
2
foreach not recognizing functions in memory
All,
I am not understanding the scoping used in foreach when it is used
inside a function. I keep getting "could not find function" errors for
functions that are in memory when I try to use foreach within a function
call. I have a simple example below. "testFun" is in memory and works
when called by foreach directly, but when I place foreach in a function
called
2012 Oct 07
3
get: problem with environments
Dear R users,
I am running R-2.15.1 in Linux Slackware64-14.0. Here is my minimal working example:
testfun <- function (x) {
a <- 0;
sapply(X="a", FUN=get, envir=sys.frame(which=x));
}
Inside R, that is R called from within a Linux terminal, the following code works:
testfun(x=5)
print(testfun(x=6))
But within rkward the above code fails and the following works:
testfun(x=1)
2011 Mar 16
2
Singularity problem
Dear R,
If I have remembered correctly, a square matrix is singular if and only if
its determinant is zero. I am a bit confused by the following code error.
Can someone give me a hint?
> a <- matrix(c(1e20,1e2,1e3,1e3),2)
> det(a)
[1] 1e+23
> solve(a)
Error in solve.default(a) :
system is computationally singular: reciprocal condition number = 1e-17
Thanks in advance!
Feng
--
2010 Sep 13
2
How to generate a particular sequence ?
Dear R,
I have a vector, say a = c(1,2,4,5,6,8). Can I generate a vector or array
(2-by-3-by-3) of this form c(1,2,1,2,1,2,4,5,4,5,4,5,6,8,6,8,6,8), in which
every two elements in "a" have been repeated twice?
I am to stupid today and could not figure this simple question out... Many
many thanks!
Feng
--
Feng Li
Department of Statistics
Stockholm University
106 91 Stockholm,
2012 Aug 08
1
random number generator with SNOW/ Parallel/ foreach
Dear All,
I have three classes of questions about generating random numbers with
different packages (windows xp 32bit R).
.
1. Suppose I would like to use package *foreach*, can I use current
Sys.time as a seed?
Although I can get the time up to1e-6 second precesion, the code below dose
not work well on a local machine with two cores. #################
library(foreach)
library(snow)
2010 Sep 07
4
a^c(1:3)
Dear R,
I have two small questions confused me recently. Now assume I have a matrix
"a", like this,
> a <- matrix(1:6, 2, 3)
> a
[,1] [,2] [,3]
[1,] 1 3 5
[2,] 2 4 6
I sometimes need each row of "a" raised to a different exponent. So I do a
trick like this,
> a^c(2, 3)
[,1] [,2] [,3]
[1,] 1 9 25
[2,] 8 64 216
My first
2015 Feb 18
4
Different serialization of functions in interactive vs. batch mode
Hi Luke,
Ah - I see - thank you! This at least points me to a way on how to
"fix" this. I tried setting the srcref attribute to NULL, but the hash
value is still different and so is the serialization. So this looks
like it is one difference, but not all of them
Even if all differences were identified - it still leaves me with
different behavior between interactive and batch-mode,
2006 Dec 20
4
R windows crash (PR#9426)
Full_Name: Robert Denham
Version: R-2.4.1
OS: Windows Xp
Submission from: (NULL) (61.88.57.1)
R gui exits without warning when I run a function which has an argument with a
default that is not found.
This was a result of an error in a function I wrote, but I thought that it
should exit more gracefully than it does. Here is an example:
testfun <- function(aa=aa) {
aa <-
2011 Feb 26
1
Wired behavior of a 2-by-2 matrix indicies
Dear R,
I found a very wired behavior for a 2-by-2 matrix, see this example
> A <- matrix(1:4, 2)
> idx4A <- matrix(1:4, 2)
> A[idx4A]
Error in A[idx4A] : subscript out of bounds
But other matrices are fine,
> B <- matrix(1:9, 3)
> idx4B <- matrix(1:9, 3)
> B[idx4B]
[1] 1 2 3 4 5 6 7 8 9
I can reproduce this for both 32bit windows and 64bit linux with R 2.12.1