スポンサーリンク

RMySQLを利用して、MYSQL環境から全角文字を取得する

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
### Rからmysqlへ接続するライブラリの読み込み ###
library(RMySQL)
library(DBI)
### Rからmysqlへ接続 ###
dbconnector <- dbConnect(dbDriver("MySQL"),host="test_server_001",
dbname="testDB", user="test_user", password="パスワード")
### クエリを実行 ###
query001 = sprintf("select id, shohin_cd, shohin_name from test_tbl where value > 0 ; ");
df <- dbGetQuery(dbconnector, "set names utf8") #全角文字取得対応
df <- dbGetQuery(dbconnector, query001)
### Rからmysqlへ接続するライブラリの読み込み ### library(RMySQL) library(DBI) ### Rからmysqlへ接続 ### dbconnector <- dbConnect(dbDriver("MySQL"),host="test_server_001", dbname="testDB", user="test_user", password="パスワード") ### クエリを実行 ### query001 = sprintf("select id, shohin_cd, shohin_name from test_tbl where value > 0 ; "); df <- dbGetQuery(dbconnector, "set names utf8") #全角文字取得対応 df <- dbGetQuery(dbconnector, query001)
### Rからmysqlへ接続するライブラリの読み込み ###
library(RMySQL)
library(DBI)

### Rからmysqlへ接続 ###
dbconnector <- dbConnect(dbDriver("MySQL"),host="test_server_001",
dbname="testDB", user="test_user", password="パスワード")

### クエリを実行 ###
query001 = sprintf("select id, shohin_cd, shohin_name from test_tbl where value > 0 ; ");
df <- dbGetQuery(dbconnector, "set names utf8") #全角文字取得対応
df <- dbGetQuery(dbconnector, query001)

上記の"set names utf8"を入れることで、返り値に全角文字があっても、文字化けしなくなる

おすすめの記事