Error in R.NET "Error: package 'RMySQL' is not
本文关键字:Error RMySQL is not package NET in quot | 更新日期: 2023-09-27 18:09:13
当我使用c#代码运行Rscript时,我得到了我在主题中提到的错误。实际上RMySQL包是正确安装在我的系统(Windows 7 64位),我能够从Rconsole直接运行脚本。但是当从c#代码调用我得到这个错误。请帮我找到一个解决方案。谢谢你
这是我的c#代码 using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using RDotNet;
namespace hottopics_new
{
public partial class hottopic : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
}
protected void btnSubmit_Click(object sender, EventArgs e)
{
REngine.SetEnvironmentVariables();
REngine engine = REngine.GetInstance();
engine.Initialize();
var hottopic = engine.Evaluate("source('E:/******/******/Rscript/hottopics.R')").AsDataFrame();
var words = hottopic[1].AsCharacter().ToArray();
var freq = hottopic[2].AsCharacter().ToArray();
Console.WriteLine(words);
Console.WriteLine(freq);
engine.Dispose();
}
}
}
' ' '
我在上面的代码中得到以下地方的错误var hottopic =引擎。评估("源(' E:/ * * / * * /R脚本/hottopics.R’)").AsDataFrame();"
这是我的R脚本
user_id = 39988
library(RMySQL)
con = dbConnect(MySQL(), user='****', password='****',
dbname='****', host='*********')
# Add the text mining library for using the removeWords and stopwords functions
library(tm)
setwd("E:/*****/****/R script")
sqlQuery <- paste("SELECT b.user_id,a.user_social_account_id,a.content
FROM mydb.updates a
INNER JOIN mydb.user_social_accounts b
ON a.user_social_account_id = b.id
WHERE a.user_social_account_id IN (SELECT id FROM mydb.user_social_accounts WHERE user_id =",user_id,')',sep = "")
updates <- dbGetQuery(con,statement=sqlQuery)
dbDisconnect(con)
words <- read.csv("stopwords.csv",colClasses = "character")
# Convert the 'words' object from data.frame to charcter vector format
words <- words$Words
updates$content <- tolower(updates$content)
content <- updates$content
# Split each words in the content and saved in a character vector format
content <-unlist(strsplit(content, split=" "))
# Remove all the stopwords,numbers and symbols from it
content <- removeWords(content,c(stopwords("english"),stopwords("SMART"),words))
content <- gsub("[^a-zA-Z]", "", content)
# Count each words frequency using the 'table' function and store the result in data.frame format
word_count <- as.data.frame(table(content))
names(word_count) <- c("Word","Freq")
# Removing the blank character from the result that comes when removing the symbols and numbers
word_count <- word_count[-(word_count$Word == ""),]
# Order the word_count data frame in the descending order of Frequency of words
word_count <- word_count[order(-word_count$Freq,word_count$Word),]
head(word_count,10)
由于IIS处理环境变量的方式,这可能是已知的问题。链接到的问题有一个由该问题的记者善意提出的解决方案。
如果解决了此问题,请将此标记为已回答;关于ASP的问题。.NET + rnet是一个反复出现的主题。