search for: soichi777

Displaying 8 results from an estimated 8 matches for "soichi777".

2013 Mar 18
4
plotting CIE chromaticity diagram?
Has anyone plotted or is it possible to plot CIE *xy* chromaticity diagram http://en.wikipedia.org/wiki/File:CIE1931xy_blank.svg I need this plot in color. ishida [[alternative HTML version deleted]]
2013 Mar 10
2
list + lapply insead of matrix + apply
I need to develop a simple list manipulation. Although it seems easier to do it in matrix form, but I need it in list form. I have a matrix x <- matrix(c(12.1, 3.44, 0.1, 3, 12, 33.1, 1.1, 23), nrow=2) for list form example, the conversion is x.list <- lapply(seq_len(nrow(x)), function(i) x[i,]) ### list version calcnorm=function(a, b){ diff <- mapply("-", a, b)
2013 Mar 11
3
take two columns from a set of lists
say I have a matrix and lists like x <- matrix(c(12.1, 3.44, 0.1, 3, 12, 33.1, 1.1, 23), nrow=2) x.list <- lapply(seq_len(nrow(x)), function(i) x[i,]) if I want a column of the matrix x, I write x[, 2] for example. But how can I do something similar for a set of lists, x.list, above? > x.list [[1]] [1] 12.1 0.1 12.0 1.1 [[2]] [1] 3.44 3.00 33.10 23.00 unlist(x.list)[,2] does
2013 Jan 07
2
plot x-axis DateTime NOT evenly spaced
R-64 latest Hi. I am trying to plot a set of csv data, which looks like > head(interval) date inteval 1 2012-07-01 00:57:54 +0900 156 2 2012-07-01 01:07:41 +0900 587 3 2012-07-01 01:09:31 +0900 110 4 2012-07-01 01:18:42 +0900 551 5 2012-07-01 01:39:01 +0900 1219 6 2012-07-01 01:40:40 +0900 99 as you can see, more than one event happens each day,
2012 Oct 03
1
distinguishing input objects for a function
platform x86_64-apple-darwin9.8.0 arch x86_64 os darwin9.8.0 system x86_64, darwin9.8.0 version.string R version 2.13.1 (2011-07-08) I am trying to write a function that takes a few objects as input. test <- function(directory, num = 1:100) { > } the argument, "num", has the default value. But when the function is called, it can take an array
2013 Mar 08
1
reduce the size of list
hi. I have a list like x <- list(1:10,11:20,21:30) It's a sort of a 3 x 10 matrix in list form. I would like to reduce the dimension of this list. it would be something like list(1:3, 11:13, 21,23) I tried x[,1:3] does not work of course. Neither lapply(x, [1:3]) works... Any suggestions? ishida [[alternative HTML version deleted]]
2013 Mar 13
1
image color analysis
I am not sure if I should ask this question in this list. But I'll try. Currently I am trying to analyze images using EBImage and biOps. One of the features that I need to extract from various images is the color spectrum, namely, which colors each image consists of. So, each image hopefully can be converted into some sort of color histogram so that color ingredients are easily comparable
2013 Mar 04
1
installing biOps on MacOSX fails
version.string R version 2.15.2 (2012-10-26) I am trying to install biOps on MacOS X 10.8.2 First, I have tiff, fftw-3, jpeg and set paths like cd /usr/include sudo ln -s /usr/local/include/fftw3.h for x in /usr/local/include/j*.h; do sudo ln -s $x; done for x in /usr/local/include/tiff*.h; do sudo ln -s $x; done cd /usr/lib for x in /usr/local/lib/libfftw3.*; do sudo ln -s $x; done for x in