From x|@oy@n@yu @end|ng |rom gm@||@com  Thu Jun  3 01:58:19 2021
From: x|@oy@n@yu @end|ng |rom gm@||@com (xiaoyan yu)
Date: Wed, 2 Jun 2021 19:58:19 -0400
Subject: [Rd] How to get utf8 string using R externals
In-Reply-To: <99d0c586-6341-554e-4bf8-5e4c9dc74c97@comcast.net>
References: <CANjVfJ0ciTGb9tR3bnYWGS4M=8uTGDsddSBx-4kxkULdyR1XxA@mail.gmail.com>
 <99d0c586-6341-554e-4bf8-5e4c9dc74c97@comcast.net>
Message-ID: <CANjVfJ3Z_kjy==g45PJW52VWXCqXh=SLE2Xvz58scRP=t06AiQ@mail.gmail.com>

I am using gmail. Not sure of the configuration of plain text.
The memory pointed by the char * as the output of Rf_translateChar() is
actually the string "<U+BD80><U+C2E4>".



On Wed, Jun 2, 2021 at 6:09 PM David Winsemius <dwinsemius at comcast.net>
wrote:

> First; you should configure yopu mail client to send plain text.
>
> Can you explain what is meant by:
>
> the characters are unicodes (<U+BD80><U+C2E4>) instead of
> utf8 encoding of the korean characters ??.
>
> As far as I can tell those two unicodes _are_ the utf8 encodings of ??.
>
> You may need to consult a couple of R help pages. I suggest:
>
> ?Quotes
> ?points   # has examples of changing fonts used for display on console.
>
> Sorry if I've misunderstood. I'm not on a Windows device, so  posting the
> C++ program won't be helpful, but maybe it would for other prospective
> respondents.
>
> --
> David.
>
> On 6/2/21 1:33 PM, xiaoyan yu wrote:
> > I have a R Script Predict.R:
> >      set.seed(42)
> >      C <- seq(1:1000)
> >      A <- rep(seq(1:200),5)
> >      E <- (seq(1:1000) * (0.8 + (0.4*runif(50, 0, 1))))
> >      L <- ifelse(runif(1000)>.5,1,0)
> >      df <- data.frame(cbind(C, A, E, L))
> > load("C:/Temp/tree.RData")                #  load the model for scoring
> >
> >    P <- as.character(predict(tree_model_1,df,type='class'))
> >
> > Then in a C++ program
> > I call eval to evaluate the script and then findVar the P variable.
> > After get each class label from P using string_elt and then
> > Rf_translateChar, the characters are unicodes (<U+BD80><U+C2E4>) instead
> of
> > utf8 encoding of the korean characters ??.
> > Can I know how to get UTF8 by using R externals?
> >
> > I also found the same script giving utf8 characters in RGui but unicode
> in
> > Rterm.
> > I tried to attach a screenshot but got message "The message's content
> type
> > was not explicitly allowed"
> > In RGui, I saw the output ??, while in Rterm, <U+BD80><U+C2E4>.
> >
> > Please help.
> >
> >       [[alternative HTML version deleted]]
> >
> > ______________________________________________
> > R-devel at r-project.org mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-devel
>

	[[alternative HTML version deleted]]



[Rd] How to get utf8 string using R externals
xiaoyan yu