Displaying 20 results from an estimated 2000 matches similar to: "problem with cut.Date/date plotting in ggplot2"
2008 Oct 31
1
reshape bug?
Hadley et al.,
I was using the cast function to reshape some data (aggregate a melted
data frame) and I did not put in the fill and for the most part the
values that came out were fine, but there were value great than an
order of magnitude from the actual value. When I put in the fill
argument everything is okay. I don't provide a reproducible example
because the data set is to large to post
2017 Dec 14
1
match and new columns
Hi Bill,
I put stringsAsFactors = FALSE
still did not work.
tdat <- read.table(textConnection("A B C Y
A12 B03 C04 0.70
A23 B05 C06 0.05
A14 B06 C07 1.20
A25 A23 A12 3.51
A16 A25 A14 2,16"),header = TRUE ,stringsAsFactors = FALSE)
tdat$D <- 0
tdat$E <- 0
tdat$D <- (ifelse(tdat$B %in% tdat$A, tdat$A[tdat$B], 0))
tdat$E <- (ifelse(tdat$B %in% tdat$A, tdat$A[tdat$C], 0))
2017 Dec 13
0
match and new columns
Hello,
Here is one way.
tdat$D <- ifelse(tdat$B %in% tdat$A, tdat$A[tdat$B], 0)
tdat$E <- ifelse(tdat$B %in% tdat$A, tdat$A[tdat$C], 0)
Hope this helps,
Rui Barradas
On 12/13/2017 9:36 PM, Val wrote:
> Hi all,
>
> I have a data frame
> tdat <- read.table(textConnection("A B C Y
> A12 B03 C04 0.70
> A23 B05 C06 0.05
> A14 B06 C07 1.20
> A25 A23 A12 3.51
2017 Dec 13
2
match and new columns
Thank you Rui,
I did not get the desired result. Here is the output from your script
A B C Y D E
1 A12 B03 C04 0.70 0 0
2 A23 B05 C06 0.05 0 0
3 A14 B06 C07 1.20 0 0
4 A25 A23 A12 3.51 1 1
5 A16 A25 A14 2,16 4 4
On Wed, Dec 13, 2017 at 4:36 PM, Rui Barradas <ruipbarradas at sapo.pt> wrote:
> Hello,
>
> Here is one way.
>
> tdat$D <- ifelse(tdat$B %in% tdat$A,
2017 Dec 14
0
match and new columns
Use the stringsAsFactors=FALSE argument to read.table when
making your data.frame - factors are getting in your way here.
Bill Dunlap
TIBCO Software
wdunlap tibco.com
On Wed, Dec 13, 2017 at 3:02 PM, Val <valkremk at gmail.com> wrote:
> Thank you Rui,
> I did not get the desired result. Here is the output from your script
>
> A B C Y D E
> 1 A12 B03 C04 0.70 0 0
2017 Dec 13
3
match and new columns
Hi all,
I have a data frame
tdat <- read.table(textConnection("A B C Y
A12 B03 C04 0.70
A23 B05 C06 0.05
A14 B06 C07 1.20
A25 A23 A12 3.51
A16 A25 A14 2,16"),header = TRUE)
I want match tdat$B with tdat$A and populate the column values of tdat$A
( col A and Col B) in the newly created columns (col D and col E). please
find my attempt and the desired output below
Desired output
2007 Dec 06
5
Help rewriting looping structure?
Hey Folks,
Could somebody help me rewrite the following code?
I am looping through all records across 5 fields to calculate the cumulative
percentage of each record (relative to each individual field).
Is there a way to rewrite it so I don't have to loop through each individual
record?
##### tdat is my data frame
##### j is my field index
##### k is my record index
##### tsum is the sum of
2008 Oct 13
1
cut.Date problem when starting on first day of week (PR#13159)
Apparently any (?) call of the form
cut(date,"weeks")
where the date *begins the week*, gives the error
Error in 1:(1 + max(which(breaks < maxx))) :
result would be too long a vector
In addition: Warning message:
In max(which(breaks < maxx)) :
no non-missing arguments to max; returning -Inf
To my surprise, this was first reported as a problem in 2006 (!)
(version 2.3.1
2018 May 18
0
exclude
... and similar to Jim's suggestion but perhaps slightly simpler (or not!):
> cross <- xtabs( Y ~ stat + year, data = tdat)
> keep <- apply(cross, 1, all)
> keep <- names(keep)[keep]
> cross[keep,]
year
stat 2003 2004 2006 2007 2009 2010
AL 38 21 20 12 16 15
NY 50 51 57 98 183 230
> ## for counts just do:
> xtabs( ~ stat + year, data
2018 May 18
1
exclude
Thank you Bert and Jim,
Jim, FYI , I have an error message generated as
Error in allstates : object 'allstates' not found
Bert, it is working. However, If I want to chose to include only mos years
example, 2003,2004,2007 and continue the analysis as before. Where should
I define the years to get as follow.
2003 2004 2007
AL 2 1 1
NY 1 1 2
Thank you
2010 Nov 01
2
transforming a dataset for association analysis RESHAPE2
I get the following message when using the reshape2 package line
> tDat.m<- melt(Dataset)
Using Item, Subject as id variables
> tDatCast<- acast(tDat.m,Subject~Item)
Aggregation function missing: defaulting to length
Note Problem Statement-
convert dataframe
Subject Item Score
1 Subject 1 Item 1 1
2 Subject 1 Item 2 0
3 Subject 1 Item 3 1
4 Subject 2 Item 1 1
5
2012 Apr 20
1
Ternaryplot as an inset graph
Hello
I am trying to add a ternary plot as a corner inset graph to a larger
main ternary plot. I have successfully used add.scatter in the past for
different kinds of plots but It doesn't seem to work for this particular
function. It overlays the old plot rather than plotting as an inset.
Here is a simple version of what I'm trying. Note that if I change the
inset plot to be an ordinary
2018 May 18
3
exclude
Hi All,
I have a sample of data set show as below.
tdat <- read.table(textConnection("stat year Y
AL 2003 25
AL 2003 13
AL 2004 21
AL 2006 20
AL 2007 12
AL 2009 16
AL 2010 15
FL 2006 63
FL 2007 14
FL 2007 25
FL 2009 64
FL 2009 47
FL 2010 48
NY 2003 50
NY 2004 51
NY 2006 57
NY 2007 62
NY 2007 36
NY 2009 87
NY 2009 96
NY 2010
2016 Apr 22
1
npudens(np) Error missing value where TRUE/FALSE needed
Hi,
I am looking for some help concerning the npudens function
in the np package.
I am trying to find a kernel density function of a
multivariate dataset and the density evaluated at each of the 176 points.
I have 2 continuous and 3 ordered discrete variables. My
sample size is 176.
So edata is a 176x(2+3) data frame, while tdat is a 1x(2+3)
vector.
bw_cx[i,] is a 1x (2+3) vector
2004 Sep 21
2
Bootstrap ICC estimate with nested data
I would appreciate some thoughts on using the bootstrap functions in the
library "bootstrap" to estimate confidence intervals of ICC values
calculated in lme.
In lme, the ICC is calculated as tau/(tau+sigma-squared). So, for instance
the ICC in the following example is 0.116:
> tmod<-lme(CINISMO~1,random=~1|IDGRUP,data=TDAT)
> VarCorr(tmod)
IDGRUP = pdLogChol(1)
2007 Aug 11
1
xyplot() with segments() superposed?
In the hypothetical example below, how do I add two segments() into
the two panels, respectively? Say segments(x0=5, y0=10, x1=5, y1=20)
on the left and segments(x0=15, y0=-10, x1=15, y1=-2) on the right?
Many thanks in advance,
Yuelin Li.
ps. part of the code came from a solution given by Deepayan Sarkar.
-------------------
library(lattice)
set.seed(12345)
x <- 0:20
y.male.obs <- - 1.2
2006 Feb 05
6
WinRAR.exe errors
I had instaled winrar3.51 and I get this errors:
fixme:actctx:CreateActCtxW stub!
err:rebar:REBAR_AdjustBands Phase 1 failed, x=692, maxx=-4, start=0, end=0
err:rebar:REBAR_AdjustBands Phase 1 failed, x=692, maxx=-4, start=0, end=0
err:rebar:REBAR_AdjustBands Phase 1 failed, x=40, maxx=-4, start=1, end=1
err:rebar:REBAR_AdjustBands Phase 1 failed, x=692, maxx=-4, start=0, end=0
2007 Mar 19
2
Graphic problem
Hello ! I'm a new user of Ubuntu Edgy , but when I try to lauch WINRAR
, via the console , I receive that error message :
libGL warning: 3D driver claims to not support visual 0x5b
libGL warning: 3D driver claims to not support visual 0x5b
fixme:shell:SHAutoComplete SHAutoComplete stub
err:rebar:REBAR_AdjustBands Phase 1 failed, x=692, maxx=-4, start=0,
end=0
err:rebar:REBAR_AdjustBands Phase
2005 May 11
1
Echo from a mail loop in list
Every time I post to the list I get the following response indicating
that there is a mail loop.
the recipient maxx@digital-system.it has some problems with looping.
Hi. This is the qmail-send program at smtp.register.it.
I'm afraid I wasn't able to deliver your message to the following
addresses.
This is a permanent error; I've given up. Sorry it didn't work out.
2010 Feb 09
1
texture dimension limits in ddx
in nv10_exa.c :
check_texture does :
if (w > 2046 || h > 2046)
NOUVEAU_FALLBACK("picture too large, %dx%d\n", w, h);
check_render_target does :
if (w > 4096 || h > 4096)
return FALSE;
So we have different size limits for the source and the destination ?
Another thing is that nv20 uses nv10_exa.c code, and the limit in