Styjun

Count the occurrence of each unique word in the file

Are the IPv6 address space and IPv4 address space completely disjoint?

why `nmap 192.168.1.97` returns less services than `nmap 127.0.0.1`?

What if a revenant (monster) gains fire resistance?

Is it possible to have a strip of cold climate in the middle of a planet?

2.8 Why are collections grayed out? How can I open them?

What should you do if you miss a job interview (deliberately)?

The screen of my macbook suddenly broken down how can I do to recover

Loading commands from file

On a tidally locked planet, would time be quantized?

Why Shazam when there is already Superman?

How much character growth crosses the line into breaking the character

How can Trident be so inexpensive? Will it orbit Triton or just do a (slow) flyby?

Yosemite Fire Rings - What to Expect?

Is it safe to use olive oil to clean the ear wax?

Create all possible words using a set or letters

Removing files under particular conditions (number of files, file age)

Can I sign legal documents with a smiley face?

What should you do when eye contact makes your subordinate uncomfortable?

Aragorn's "guise" in the Orthanc Stone

Why did the Mercure fail?

How to bake one texture for one mesh with multiple textures blender 2.8

How can "mimic phobia" be cured or prevented?

What is this called? Old film camera viewer?

How do I change every element in a vector to my reference class?

How to access the last value in a vector?Test if a vector contains a given elementCounting the number of elements with the values of x in a vectorHow to find common elements from multiple vectors?Extract every nth element of a vectorIs there an R function for finding the index of an element in a vector?Is there a way to declare public and private methods for S4 Reference Classes?How to remove last n characters from every element in the R vectorChanging every element in vector or list by the same numberHow to implement a dispose pattern into a reference class in R?

0

I am trying to convert every object in my vector of strings to a reference class. Suppose my reference class is:

myrefclass <- function(str) 
 methods <- list()

 methods$cnt <- function() 
 return(str_length(str))
 

 methods

I tried to convert the following vectors (albeit, no success):

v1 <- c("ABC", "D", "FGHI")
v2 <- c(ABC="ABC", D="D", FGHI="FGHI")

Then I try to apply the reference class to each element of the vector:

res1 <- sapply(v1, myrefclass)
res2 <- sapply(v2, myrefclass)

I would then think I could use this as follows (but regretfully it doesn't work):

> res1["ABC"]$cnt
NULL
> res2["ABC"]$cnt
NULL

How do I create a vector of reference classes and access its methods?

NOTE #1: I would prefer a base-R solution but it would be interesting to
see what packages might help

NOTE #2: I am looking for a dynamic solution. To illustrate that point,
suppose an extension of this question would be to use res1 or res2
to find all strings that have $cnt=3. Therefore, accessing strings
as in res1$ABC$cnt won't work as you don't know that ABC is in
v1 or v2 (whichever you think is appropriate).

r

share|improve this question

edited 2 days ago

Denis

asked 2 days ago

DenisDenis

5,873957118

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  If you want the number of characters, use nchar.
  
  – yarnabrina
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  For clarification, you want res1["ABC"]$cnt=3 and res1["FGHI"]$cnt=4. Is that it?
  
  – yarnabrina
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  yes, that's exactly what I would like to achieve
  
  – Denis
  2 days ago
  

  
  
  
  

add a comment | 

0

I am trying to convert every object in my vector of strings to a reference class. Suppose my reference class is:

myrefclass <- function(str) 
 methods <- list()

 methods$cnt <- function() 
 return(str_length(str))
 

 methods

I tried to convert the following vectors (albeit, no success):

v1 <- c("ABC", "D", "FGHI")
v2 <- c(ABC="ABC", D="D", FGHI="FGHI")

Then I try to apply the reference class to each element of the vector:

res1 <- sapply(v1, myrefclass)
res2 <- sapply(v2, myrefclass)

I would then think I could use this as follows (but regretfully it doesn't work):

> res1["ABC"]$cnt
NULL
> res2["ABC"]$cnt
NULL

How do I create a vector of reference classes and access its methods?

NOTE #1: I would prefer a base-R solution but it would be interesting to
see what packages might help

NOTE #2: I am looking for a dynamic solution. To illustrate that point,
suppose an extension of this question would be to use res1 or res2
to find all strings that have $cnt=3. Therefore, accessing strings
as in res1$ABC$cnt won't work as you don't know that ABC is in
v1 or v2 (whichever you think is appropriate).

r

share|improve this question

edited 2 days ago

Denis

asked 2 days ago

DenisDenis

5,873957118

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  If you want the number of characters, use nchar.
  
  – yarnabrina
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  For clarification, you want res1["ABC"]$cnt=3 and res1["FGHI"]$cnt=4. Is that it?
  
  – yarnabrina
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  yes, that's exactly what I would like to achieve
  
  – Denis
  2 days ago
  

  
  
  
  

add a comment | 

I am trying to convert every object in my vector of strings to a reference class. Suppose my reference class is:

myrefclass <- function(str) 
 methods <- list()

 methods$cnt <- function() 
 return(str_length(str))
 

 methods

I tried to convert the following vectors (albeit, no success):

v1 <- c("ABC", "D", "FGHI")
v2 <- c(ABC="ABC", D="D", FGHI="FGHI")

Then I try to apply the reference class to each element of the vector:

res1 <- sapply(v1, myrefclass)
res2 <- sapply(v2, myrefclass)

I would then think I could use this as follows (but regretfully it doesn't work):

> res1["ABC"]$cnt
NULL
> res2["ABC"]$cnt
NULL

How do I create a vector of reference classes and access its methods?

NOTE #1: I would prefer a base-R solution but it would be interesting to
see what packages might help

NOTE #2: I am looking for a dynamic solution. To illustrate that point,
suppose an extension of this question would be to use res1 or res2
to find all strings that have $cnt=3. Therefore, accessing strings
as in res1$ABC$cnt won't work as you don't know that ABC is in
v1 or v2 (whichever you think is appropriate).

r

share|improve this question

edited 2 days ago

Denis

asked 2 days ago

DenisDenis

5,873957118

myrefclass <- function(str) 
 methods <- list()

 methods$cnt <- function() 
 return(str_length(str))
 

 methods

v1 <- c("ABC", "D", "FGHI")
v2 <- c(ABC="ABC", D="D", FGHI="FGHI")

res1 <- sapply(v1, myrefclass)
res2 <- sapply(v2, myrefclass)

> res1["ABC"]$cnt
NULL
> res2["ABC"]$cnt
NULL

share|improve this question

edited 2 days ago

Denis

asked 2 days ago

DenisDenis

5,873957118

share|improve this question

edited 2 days ago

Denis

asked 2 days ago

DenisDenis

5,873957118

asked 2 days ago

DenisDenis

5,873957118

asked 2 days ago

DenisDenis

5,873957118