Displaying 20 results from an estimated 5000 matches similar to: "Speeding up time conversion"
2010 Jan 09
1
Reducing the size of a large script top speed onset of execution
Colleagues,
(R 2.10 on all platforms)
I have a lengthy script (18000 lines) that runs within a graphical
interface. The script consists of 100's of function followed by a
single command that calls these functions (execution depends on a
number of environment variables passed to the script). As a result,
nothing is executed until the final line of code is read. It takes
15-20
2012 Oct 18
4
speeding read.table
R 2.15.1
OS X
Colleagues,
I am reading a 1 GB file into R using read.table. The file consists of 100 tables, each of which is headed by two lines of characters.
The first of these lines is:
TABLE NO. 1
The second is a list of column headers.
For example:
TABLE NO. 1
COL1 COL2 COL3 COL4 COL5 COL6 COL7 COL8 COL9 COL10
2010 Feb 12
1
Identifying special characters in a text file
Colleagues
R 2.10.1 on a Mac
I read in textfiles using readLines, then I process those files, then I use R to execute another program. Occasionally those files contain characters other than letter / numbers / routine punctuation marks. For example, a bullet (option-8 on a Mac) triggers the problem.
Although R can read and process those characters, the other program cannot so I would like to
2012 Nov 28
3
Speeding reading of large file
R 2.15.1
OS X and Windows
Colleagues,
I have a file that looks that this:
TABLE NO. 1
PTID TIME AMT FORM PERIOD IPRED CWRES EVID CP PRED RES WRES
2.0010E+03 3.9375E-01 5.0000E+03 2.0000E+00 0.0000E+00 0.0000E+00 0.0000E+00 1.0000E+00 0.0000E+00 0.0000E+00 0.0000E+00 0.0000E+00
2.0010E+03 8.9583E-01
2011 Mar 29
2
Probing a function
R 2.12.2
Windows 7
Colleagues,
I just took advantage of the function:
readWindowsShortcut
in R.utils. It accomplished my goals and I was interested in learning its inner workings. So, I typed the function at the command line (without arguments or parentheses). R returned:
function (...)
UseMethod("readWindowsShortcut")
<environment: namespace:R.utils>
providing no
2009 Nov 13
5
Help with complicated regular expression
Colleagues,
I am using R (2.9.2, all platforms) to search for a complicated text
string using regular expressions. I would appreciate any help you can
provide.
The string consists of the following elements:
SOMEWORDWITHNOSPACES
any number of spaces and/or tabs
(
any number of spaces and/or tabs
integer
any number of spaces and/or tabs
)
Examples include:
WORD ( 123 )
WORD(1 )
2011 Mar 25
2
Finding the common portion of strings
Colleagues
R: 2.12.2
OS X
I have a set of text objects in the form (I am showing 3 of what is more likely to be 20 or so):
OBJECTS <- c("abcSOMETHINGCOMMONegf", "xSOMETHINGCOMMONyz", "SOMETHINGCOMMONnme")
As you can see, all contain "SOMETHINGCOMMON" and the position varies. But, I don't know what that "SOMETHINGCOMMON" is.
Is there an
2011 May 26
4
Applying "toupper" to only portions of text strings
Colleagues
Assume that I have a vector containing some text strings, some of which contain a particular character. I could like to apply "toupper" to the text before the character. For example (in this case, "|" is the particular character):
ORIGINAL:
TEXT <- c("aaaa", "bbb|cc", "|ddd")
AFTER APPLICATION OF toupper:
TEXT <-
2010 Jul 20
1
Registered / trademark signs
Colleagues,
What is the easiest means to embed a:
? (registered)
or
? (trademark)
sign in text in a graphic. I would like to use mtext and avoid plotmath, if possible. Ideally, the sign should be superscripted but I can easily sacrifice that.
Optimally, I need a solution that works in both OS X and Windows (? XP) and with R versions ? 2.11
Thanks in advance.
Dennis
Dennis Fisher MD
P <
2011 Apr 10
3
Adding margin text to lattice graphics
Colleagues
I am learning lattice graphics (R 2.12.2; OS X). Several days ago, I inquired about adding margin text to lattice graphics. Jim Price offered a useful reply, suggesting that I add:
page = function(page) grid.text('words', x = 0.5, y = 0.01)
to my call to the function. The entire function that he suggested was;
xyplot(1 ~ 1,
par.settings = list(layout.heights =
2010 May 05
1
Unexpected call to "require"
Colleagues
I am executing a length script in R (20K lines). At one point, it returns:
> Loading required package: tcltk
> Loading Tcl/Tk interface ... done
> Loading required package: Hmisc
> Loading required package: survival
> Loading required package: stats
> Loading required package: graphics
> Loading required package: splines
> Attaching package: 'Hmisc'
2011 Mar 04
1
Environment variable PATH in Windows
Colleagues,
I am trying to understand how R (2.12.1) obtains the PATH environment variable in Windows (7 or Vista). Startup {base} directs one to:
"R_ENVIRON" -- which equals "" in my systems
R_HOME/etc/Renviron.site -- which does not exist
Next, it directs to:
R_HOME/etc/Rprofile.site -- which also does not exist (the expected behavior in a "factory-fresh"
2010 Mar 24
1
shading an area of a graphic
Colleagues
OS 10.5
R: 2.10.1
I have a simple x-y plot for which I would like to shade the lower (or upper) part of the interior region (i.e., the area bounded by the axes). If the delineation between top and bottom were linear, it would be use to use the polygon function. However, the delineation is a curve (which I can describe by an equation). In theory, I could divide the x-axis into a
2009 Dec 04
3
Use of apply rather than a loop
Colleagues,
R 2.9.0 on all platforms
I have a dataset that contains three columns of interest: ID's, serial
elapsed times, and a marker. Representative data:
Subject Time Marker
1 100.5 0
1 101 0
1 102 1
1 103 0
1 105 0
For each subject, I would like to find the time associated with MARKER
== 1, then replace Time with Time - (Time[Marker == 1])
The result for this
2023 Jan 16
3
Printing special characters
R 4.2.2
OS X
Colleagues
A file that I have read includes strings like this:
"EVENT ? 30 sec"
When I include the string in a graphic using:
mtext(STRING, ?)
it appears as:
"EVENT ... 30 sec"
Is there a simple work-around (short of reformatting all the strings, then using plotmath)?
Dennis
Dennis Fisher MD
P < (The "P Less Than" Company)
Phone / Fax:
2018 Feb 22
2
Problem with geterrmessage()
Luke
Thanks ? I revised the code to:
ERRORMESSAGE <- try(source(USERSCRIPTFILE, local=T), silent=T)
print(ERRORMESSAGE) now returns:
$value
[1] 0
$visible
[1] FALSE
Not clear what to make of that.
Dennis
Dennis Fisher MD
P < (The "P Less Than" Company)
Phone / Fax: 1-866-PLessThan (1-866-753-7784)
www.PLessThan.com
> On Feb 22, 2018, at 12:45 PM, luke-tierney at
2010 Oct 11
1
grep triggering error on unicode character
Colleagues,
[R 2.11; OS X]
I am processing a file on the fly that contains the following text:
XXX??
[email clients may display this differently -- the string is three X's followed by two instances of the letter a with an acute accent]
I read the file with:
X <- readLines(FILENAME)
In this instance, the text of interest is on line 213. When I examine line 213, it reads:
XXX\xe1\xe1
2009 Sep 29
3
Deleting a column in a dataframe by name
Colleagues,
Hopefully a simple problem: I want to delete a column with a known
name from a dataframe. I could write:
FRAME <- FRAME[, names(FRAME) != NAMETODELETE]
or
FRAME <- FRAME[, !names(FRAME) %in% c(NAME1, NAME2, ETC)]
Is there some simpler means to accomplish this?
Dennis
Dennis Fisher MD
P < (The "P Less Than" Company)
Phone: 1-866-PLessThan (1-866-753-7784)
2010 Mar 27
1
string width calculation
Colleagues,
I am trying to create a PDF document in which I use margin text with two different fonts. The resulting text might be:
XXXXXyZZZ
where X and Z are one font and Y is the other.
My plan was to do this in the following manner:
mtext("XXXXX ZZZ", cex=2, adj=0.5, family=SOMEFONT)
mtext("Y", cex=2, adj=??, family=DIFFERENTFONT)
My question regards how to calculate
2007 Sep 04
2
Recursive concatenation
Colleagues,
I want to create the following array:
"A1", "A2", "A3", "B1", "B2", "B3", "C1", "C2", "C3"
I recall that there is a trick using "c" or "paste" permitting me to
form all combinations of c("A", "B", "C") and 1:3. But, I can't
recall the