search for: toupper

Hi, So far with the latest changes the projects I am trying to port works fine, except for a mismatch on what is considered the ansi behaviour of islower() in ctype.h: ----- i = 220 islower (i) = 0, ISLOWER (i) = 0 toupper (i) = 220, TOUPPER (i) = 220 i = 221 islower (i) = 0, ISLOWER (i) = 0 toupper (i) = 221, TOUPPER (i) = 221 i = 222 islower (i) = 0, ISLOWER (i) = 0 toupper (i) = 222, TOUPPER (i) = 222 i = 223 islower (i) = 2, ISLOWER (i) = 0 toupper (i) = 223, TOUPPER (i) = 223 No Match! nosferatu 1.0.0.rc6.klibc4...

Hi, I don't know what I am doing wrong to the toupper does not seem working in sub + regex. The following returns 's' not the upper class 'S' as I expect: sub("q_([a-z])[a-zA-Z]*",toupper('\\1'),"q_sviRaw") Can someone tell me where I did wrong? Thanks, Richard [[alternative HTML version deleted]]

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 <- c("AAAA", "BBB|cc", "|dddd") I c...

if this is a doublepost please sorry bur the first post was blocked by spamfilter because of wrong timesettings on my local computer. i reaplyed to my original post and now im not shure if the mailserver thinks the message is corrupt because of reply to a non existing message. here is the originalmessage (again?) Hi everyone, thirst of all please forgive my bad english :) i have installed wine

...t r-project.org] On Behalf Of Ed Siefker Sent: Tuesday, October 24, 2017 1:00 PM To: r-help <r-help at r-project.org> Subject: Re: [R] as.data.frame doesn't set col.names Wait. Now I'm really confused. > > head(samples) quant_samples age sapply(yo, toupper) E11.5 F20het BA40 E11.5 F20het BA40 E11.5 F20HET E11.5 F20het BA45 E11.5 F20het BA45 E11.5 F20HET E11.5 F20het BB84 E11.5 F20het BB84 E11.5 F20HET E11.5 F9.20DKO KTr3 E11.5 F9.20DKO KTr3 E11.5 F9.20DKO E11.5 F9.20DKO PEd2 E11.5 F9.20DKO...

Hi All, I am trying to match two character arrays (email lists) using either pmatch(), match() or charmatch() functions. However the function is "missing" some matches due to differences in the cases of some letters between the two arrays. Is there any way to disable case sensitivity or is there an entirely better way to match two character arrays that have identical entries but written

...() functions. Use str(samples) to see what you are dealing with. Actually, I think there is enough information to diagnose this. The main issue is as you point out, assignment of an entire data frame to a column of another data frame: > l <- letters[1:5] > s <- as.data.frame(sapply(l,toupper)) > dput(s) structure(list(`sapply(l, toupper)` = structure(1:5, .Label = c("A", "B", "C", "D", "E"), class = "factor")), .Names = "sapply(l, toupper)", row.names = c("a", "b", "c", "d&quot...

...; see what you are dealing with. > > Actually, I think there is enough information to diagnose this. The main > issue is as you point out, assignment of an entire data frame to a column > of another data frame: > > > l <- letters[1:5] > > s <- as.data.frame(sapply(l,toupper)) > > dput(s) > structure(list(`sapply(l, toupper)` = structure(1:5, .Label = c("A", > "B", "C", "D", "E"), class = "factor")), .Names = "sapply(l, toupper)", > row.names = c("a", > "b", &quo...

Why doesn't this work? > samples$geno <- as.data.frame(sapply(yo, toupper), col.names="geno") > samples quant_samples age sapply(yo, toupper) E11.5 F20het BA40 E11.5 F20het BA40 E11.5 F20HET E11.5 F20het BA45 E11.5 F20het BA45 E11.5 F20HET

...9;hello world', 'something Else')) [1] "R project" "hello world" "something Else" I know how to obtain all capitals or all lower case letters: > tolower(z) [1] "r project" "hello world" "something else" > toupper(z) [1] "R PROJECT" "HELLO WORLD" "SOMETHING ELSE" I saw the tocamel() function in 'rapport', but it doesn't do what I want to achieve as it actually proceeds to camelCase/CamelCase the strings: > tocamel(z) [1] "RProject" "he...

Wait. Now I'm really confused. > > head(samples) quant_samples age sapply(yo, toupper) E11.5 F20het BA40 E11.5 F20het BA40 E11.5 F20HET E11.5 F20het BA45 E11.5 F20het BA45 E11.5 F20HET E11.5 F20het BB84 E11.5 F20het BB84 E11.5 F20HET E11.5 F9.20DKO KTr3 E11.5 F9.20DKO KTr3 E11.5 F9.20DKO E11.5 F9.20DKO PEd2 E11.5 F9.20DKO...

...s hours to complete. Part Number columns can have from 7'000 to 80'000 records and I've never got enough patience to wait for completion of more than 17'000 records. Is there a way to find out which of the function used below is the bottleneck, as.integer, is.na, sub, paste, nchar, toupper? Is there a profiler for R and if yes where could I find some documentation on how to use it? The code: # String contains digits only (can be converted to an integer) digits_only <- function(x) { suppressWarnings(!is.na(as.integer(x))) } # Remove blanks at both ends of a string trim <- fun...

..., then it returns class "data.frame" but if it is referenced by name, it returns class "factor" or whatever the column actually is: dat[1] returns class "data.frame" but dat$name returns class "factor" The problem is that, when one applies the tolower() and toupper() functions, dat$name will return a column of lower/uppercase returns (now class "character") but dat[1] will return an array of factor level indexes. Specifying dat[1] as.character during the function call does not work (e.g. tolower(as.character(dat[1]))). So, I would loop over the co...

When I am connecting to the server via ODBC I got the following error. >library(RODBC) channel <- odbcConnect("my server", uid="***" , case="*****") Error in switch(case, toupper = case <- 1L, tolower = case <- 2L, postgresql = case <- 2L, : Invalid case parameter: nochange | toupper | tolower | common db names How to fix this error? Thanks -- View this message in context: http://r.789695.n4.nabble.com/RODBC-in-R-tp2258510p2258510.html Sent from the R help...

Our legacy PBX will not accept the callerID name in anything but capital letters. (Harris 20-20) When I send a call to the legacy PBX from asterisk I would like to have asterisk convert the callerID name to uppercase letters. Is there a way to do this? Thanks for any input. -Sean

...a looking-ups to someone reading td files), but I think we can have for-loop inside a multiclass without abstractions. -------------------- multiclass sse_binop<opcode> { for type = [f32, f64, v4f32, v2f64] regclass = [FP32, FP64, VR128, VR128] suffix = [ss, sd, ps, pd] { def !toupper(suffix)#rr : Instr< [(set (type regclass:$dst), (type (opcode (type regclass:$src1), (type regclass:$src2))))]>; def !toupper(suffix)#rm : Instr< [(set (type regclass:$dst), (type (opcode (type regclass:$src1),...

...ov 24 11:33:52 2003 @@ -0,0 +1,25 @@ +/* + * strcasecmp.c + * + */ + +#include <string.h> +#include <ctype.h> + +int strcasecmp(const char *s1, const char *s2) +{ + char *n1, *n2; + int i, retval; + + n1 = strdup(s1); + n2 = strdup(s2); + + for (i = 0; i < strlen(n1); i++) + n1[i] = toupper(n1[i]); + for (i = 0; i < strlen(n2); i++) + n2[i] = toupper(n2[i]); + retval = strcmp(n1, n2); + free(n1); + free(n2); + return retval; +} diff -Nru a/klibc/strncasecmp.c b/klibc/strncasecmp.c --- /dev/null Wed Dec 31 16:00:00 1969 +++ b/klibc/strncasecmp.c Mon Nov 24 11:33:52 2003 @@ -0,0 +1,...

..."" for ( i in 1:length( lines ) ) { line <- lines[ i ] if ( line == "" ) next if ( substr( line, 1, 1 ) == ">" ) { if ( seq != "" && gene != "" ) upstream[ gene ] <- toupper( seq ) splitted <- strsplit( line, "\t" )[[ 1 ]] splitted <- strsplit( splitted[ 1 ], ";\\ " )[[ 1 ]] gene <- toupper( substr( splitted[ 1 ], 2, nchar( splitted[ 1 ] ) ) ) syn <- splitted[ 2 ]...

...r=TRUE, strings=FALSE ), proj='UTM', zone=10 ) par( mfrow=c(3,1) ) # Plot the events with plot limits large enough to show # the full extent of all the symbols plotPoints( events, pch=16, cex=5, col=events$Color, xlim=c(490,508), ylim=c(1490,1508), proj=TRUE ) with( events, text( X, Y, toupper( substr( Color, 1, 1 ) ), font=2, cex=2 ) ) # Normal plot extents; partial symbols cut off by edges # of plotting region (as expected) plotPoints( events, pch=16, cex=5, col=events$Color, proj=TRUE ) with( events, text( X, Y, toupper( substr( Color, 1, 1 ) ), font=2, cex=2 ) ) ## Now use mo...

...), but I think we > can have for-loop inside a multiclass without abstractions. > > -------------------- > multiclass sse_binop<opcode> { > for type = [f32, f64, v4f32, v2f64] > regclass = [FP32, FP64, VR128, VR128] > suffix = [ss, sd, ps, pd] { > > def !toupper(suffix)#rr : Instr< > [(set (type regclass:$dst), (type (opcode (type regclass:$src1), > (type regclass:$src2))))]>; > def !toupper(suffix)#rm : Instr< > [(set (type regclass:$dst), (type (opcode (type regclass:$src1), &gt...