Displaying 20 results from an estimated 1205 matches for "e2".
Did you mean:
ec2
2012 Jul 18
6
taylor expansions with real vectors
Dear list,
I have a big deal concerning the development of a Taylor expansion.
require(Matrix)
e1 <- as.vector(1:5)
e2 <- as.vector(6:10)
in order to obtain all the combinations between these two vectors following
a Taylor expansion (or more simply through a Maclaurin series) for real
numbers.
We have f(x) = f(0) + f'(0)(x-0) + f''(0)(x-0)^2/2! + ? + f^(k)(0)(x-0)^k/k!
with
f(x) = e1 + e2 for Ta...
2019 Nov 17
2
BUG?: A copy of base::`+` (primitive) is not a clone but a "pointer"
$ R --vanilla
R version 3.6.1 (2019-07-05) -- "Action of the Toes"
Copyright (C) 2019 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)
...
> str(base::`+`)
function (e1, e2)
> plus <- structure(base::`+`, class = "plus")
> str(plus)
function (e1, e2)
- attr(*, "class")= chr "plus"
## Hmm ...
> str(base::`+`)
function (e1, e2)
- attr(*, "class")= chr "plus"
> class(base::`+`) <- NULL
> str(base...
2019 Nov 18
2
BUG?: A copy of base::`+` (primitive) is not a clone but a "pointer"
...> $ R --vanilla R version 3.6.1 (2019-07-05) -- "Action of
> > the Toes" Copyright (C) 2019 The R Foundation for
> > Statistical Computing Platform: x86_64-pc-linux-gnu
> > (64-bit) ...
>
> >> str(base::`+`)
> > function (e1, e2)
>
> >> plus <- structure(base::`+`, class = "plus") str(plus)
> > function (e1, e2) - attr(*, "class")= chr "plus"
>
> > ## Hmm ...
> >> str(base::`+`)
> > function (e1, e2) - attr(*, "class&qu...
2017 Aug 25
2
retrieve machine password in current Samba?
...On older machines running Samba 4.2 (Debian Jessie) tdbdump gives a working password such as this:
]f2>lOR4NA~hbv\00 where the actual password is ]f2>lOR4NA~hbv
On newer machines running Samba 4.5 (Debian Stretch) tdbdump gives an encrypted password such as this:
\EE\A9\8D\EF\AD\AC\E2\A1\9D\E2\A0\8C\E3\96\8E\E7\B0\A8\EE\97\AA\E2\8E\9F\E2\A2\8F\EB\85\BF\EE\B7\8B\EA\A7\A9\EA\97\B8\D2\86\E6\83\AB\EE\82\AA\E3\A9\BB\E3\8A\8D\E2\86\9B\E2\8C\92\E6\8C\A6\EA\85\A5\E6\8F\82\EF\96\94\EF\9C\82\E7\8D\B3\E7\8F\93\E7\B8\AA\E7\A7\B7\EE\88\96\E2\A3\9B\EB\AA\B0\E6\B6\A7\EF\B6\B7\EA\A2\AD\EF\A8\88...
2011 Jan 10
0
No subject
But from AMI i still se =E2=80=9Cx=E2=80=9D as =E2=80=9C5=E2=80=9D not =
=E2=80=9C8=E2=80=9D.
/Magnus
------=_NextPart_000_0092_01CBED56.27C28160
Content-Type: text/html;
charset="utf-8"
Content-Transfer-Encoding: quoted-printable
<HTML><HEAD></HEAD>
<BODY dir=3Dltr>
<DIV dir=3Dltr>...
2005 Jun 03
2
rearrange data
Dear all:
I have this:
A1 B1 C1 D1 E1
A2 B2 C2 D2 E2
A3 B3 C3 D3 E3
And I want this
A1 E1
B1 E1
C1 E1
D1 E1
A2 E2
B2 E2
C2 E2
D2 E2
A3 E3
B3 E3
C3 E3
D3 E3
Example:
m<- matrix(1:15,nrow=3,byrow=T)
m
v<- unlist(list(t(m[,1:4])))
u<- rep(c(5,10,15),c(4,4,4))
data.frame(v,u)
This is the result I want but I would like t...
2004 May 31
0
Doubts on anova and use of contrasts in multcomp package
Dear list,
I have been studying R and I would like the aid of more experienced to solve the problems of the analysis below:
r = gl(3, 8, label = c('r1', 'r2', 'r3'))
e = rep(gl(2, 4, label = c('e1', 'e2')), 3)
y = c(26.2, 26.0, 25.0, 25.4, 24.8, 24.6, 26.7, 25.2, 25.7, 26.3, 25.1, 26.4,
19.6, 21.1, 19.0, 18.6, 22.8, 19.4, 18.8, 19.2, 19.8, 21.4, 22.8, 21.3)
df = data.frame(r, e, y)
aux = sort(rep(letters[1:6], 4)) #auxiliary variable
df = data.frame(df, aux)
attach(df)
par(mfr...
2002 Aug 22
1
Error: object is not a matrix
...ity of Washington, Box 351525
Seattle, WA. 98195, USA
E-Mail: alkim at u.washington.edu; Tel: (206)543-2395
Included below is the data I'm using.
> AK.df
Y P A B C
1 10 1 E1 Red Agent
2 9 1 E1 Red Patient
3 0 1 E1 Unred Agent
4 0 1 E1 Unred Patient
5 5 1 E2 Red Agent
6 6 1 E2 Red Patient
7 0 1 E2 Unred Agent
8 0 1 E2 Unred Patient
9 8 2 E1 Red Agent
10 9 2 E1 Red Patient
11 0 2 E1 Unred Agent
12 0 2 E1 Unred Patient
13 4 2 E2 Red Agent
14 4 2 E2 Red Patient
15 0 2 E2 Unred Agent
16 0 2 E2 Unred Patient
17 12 3 E1...
2019 Nov 18
2
BUG?: A copy of base::`+` (primitive) is not a clone but a "pointer"
...tion of
> >> > the Toes" Copyright (C) 2019 The R Foundation for
> >> > Statistical Computing Platform: x86_64-pc-linux-gnu
> >> > (64-bit) ...
> >>
> >> >> str(base::`+`)
> >> > function (e1, e2)
> >>
> >> >> plus <- structure(base::`+`, class = "plus") str(plus)
> >> > function (e1, e2) - attr(*, "class")= chr "plus"
> >>
> >> > ## Hmm ...
> >> >> str(base...
2017 Aug 25
0
retrieve machine password in current Samba?
...n Jessie) tdbdump gives a working password such as this:
>
>
> ]f2>lOR4NA~hbv\00 where the actual password is ]f2>lOR4NA~hbv
>
>
> On newer machines running Samba 4.5 (Debian Stretch) tdbdump gives an encrypted password such as this:
>
>
> \EE\A9\8D\EF\AD\AC\E2\A1\9D\E2\A0\8C\E3\96\8E\E7\B0\A8\EE\97\AA\E2\8E\9F\E2\A2\8F\EB\85\BF\EE\B7\8B\EA\A7\A9\EA\97\B8\D2\86\E6\83\AB\EE\82\AA\E3\A9\BB\E3\8A\8D\E2\86\9B\E2\8C\92\E6\8C\A6\EA\85\A5\E6\8F\82\EF\96\94\EF\9C\82\E7\8D\B3\E7\8F\93\E7\B8\AA\E7\A7\B7\EE\88\96\E2\A3\9B\EB\AA\B0\E6\B6\A7\EF\B6\B7\EA\A2\AD\EF\A8\88...
2008 Jul 29
1
environment question
Hi R users!
I was looking at some of the example code for the "environment"
function. Here it is:
e1 <- new.env(parent = baseenv()) # this one has enclosure package:base.
e2 <- new.env(parent = e1)
assign("a", 3, envir=e1)
ls(e1)
ls(e2)
exists("a", envir=e2) # this succeeds by inheritance
exists("a", envir=e2, inherits = FALSE)
exists("+", envir=e2) # this succeeds by inheritance
My question is: how can "a" exis...
2009 Nov 25
1
group generics
...t?
I would also appreciate any comments if what I'm trying to do seems like
the wrong approach.
Here's a stripped down example:
setClass("A",
representation=representation(xa="numeric")
)
setMethod("Arith", signature(e1="numeric", e2="A"), function(e1, e2) {
new("A", ax=e1*e2 at xa)
}
)
setClass("B",
representation=representation(xb="numeric"),
contains=c("A")
)
setMethod("Arith", signature(e1="numeric", e2="B&quo...
2004 Oct 08
3
creating named elements of lists on the fly
...h named elements. Only, I don't know the names of the elements a priori (they come from the data being calculated). Currently, my approach is to create an environment, then assign things to the environement, then as.list the environment to get a list.
Running the code gives, for example:
> e2 <- new.env(FALSE, NULL)
> assign("dude", 123, env=e2)
> assign("chick", 456, env=e2)
> as.list(e2)
Error in as.vector(x, "list") : cannot coerce to vector
Is this the best way to make a list like this?
Thanks,
Ben
2007 Mar 23
1
substitute and S4 objects
Hi all,
I don't understand why this does not what I expect :
## code start here ##############
setClass("num",representation(x="numeric"))
num<-function(x) new("num",x=x)
add<-function(e1,e2) {
cat("Computing
",deparse(substitute(e1)),"+",deparse(substitute(e2)),"\n")
e1@x+e2@x
}
setMethod("+","num",function(e1,e2) {
cat("Computing
",deparse(substitute(e1)),"+",deparse(substitute(e2)),"\n")...
2011 Jan 10
0
No subject
...n the dialplan:
exten =3D> 0106024975,1,Set(DB(DS/0733025975)=3DINUSE)
exten =3D> 0106024975,n,Hangup()
exten =3D> 0106024976,1,Set(DB(DS/0733025975)=3DUNAVAILABLE)
exten =3D> 0106024976,n,Hangup()
Just a short call to my cell phone, to se if i get anything back, my =
cell phone doesn=E2=80=99t even ring.
Wait a second if the call is redirected, then check to se if the status =
has changed from NOT_INUSE to something else.
Dont know if it is a stupid idea, but it worked on my cell phone, and =
the switchboard girls was very happy to be able =E2=80=9Cto ask=E2=80=9D =
my cell phone...
2009 Nov 16
0
(Date + difftime) and (POSIXt + difftime) does not use date/time arithmetics (PR#14067)
...as.difftime(1, units="hours")
[1] "2009-09-09 09:09:10 ICT"
Warning message:
Incompatible methods ("+.POSIXt", "Ops.difftime") for "+"
I inspect the function definition for '+.Date' and 'Ops.difftime'.
> `+.Date`
function (e1, e2)
{
coerceTimeUnit <- function(x) {
round(switch(attr(x, "units"), secs = x/86400, mins = x/1440,
hours = x/24, days = x, weeks = 7 * x))
}
if (nargs() == 1)
return(e1)
if (inherits(e1, "Date") && inherits(e2, "Date"...
2008 Mar 13
2
Making custom unary operators in R
...he
relevant discussion thread would be wonderful.
For example in the J language the ``! `` sign is a unary operator for the
factorial function and a binary operator for the choose function so I
would like to be able to define a similar operator like this::
'%!%' <- function(e1, e2) {
if (missing(e2)) factorial(e1)
else choose(e2, e1)
}
The binary version of the operator works fine:
> 2 %!% 4
[1] 6
But the unary one doesn't (which is perfectly understandable since there
is no indication in any documentation I have seen that...
2011 Nov 02
1
overloading + operator for chars
Hello,
I would like to overload the "+" operator so that it can be used to concatenate two strings, e.g "John" + "Doe" = "JohnDoe".
How can I 'unseal' the "+" method?
> setMethod("+", signature(e1="character", e2="character"), function(e1, e2) paste(e1, e2, sep="") )
Error in setMethod("+", signature(e1 = "character", e2 = "character"), :
the method for function "+" and signature e1="character", e2="character" is sealed and...
2012 Jul 11
2
help with merging 2 data frames
...ot;,"ba","ba","bb","bb"),b=c(1:2,1:2,1:2,1:2),d=c(10,20,30,40,50,60,70,80))
y<-data.frame(a2=c("aa","aa","ba","ba"),a3=c("ab","ab","bb","bb"),b=c(1:2,1:2),e1=c(100,200,300,400),e2=c(101,201,301,401))
(x);(y)
# I'd like to merge them so that the result looks like this:
desired<-data.frame(a=c("aa","aa","ab","ab","ba","ba","bb","bb"),b=c(1:2,1:2,1:2,1:2),d=c(10,20,30,40,50,60,70,80),
e1=c...
1999 Mar 23
1
(-2) %% 12
(-2) %% 12 seems to give the wrong result in R pre 63.3:
> e1 <- -2
> e2 <- 12
> e1 %% e2
[1] -2
> e1 - floor(e1/e2) * e2
[1] 10
In Splus:
> e1 <- -2
> e2 <- 12
> e1 %% e2
[1] 10
> e1 - floor(e1/e2) * e2
[1] 10
Paul Gilbert
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://ww...