blocks|key|172519|text|您的数据框包含两个具有原始信息的因子。条形图要求每个类别都有一个数字才能绘制。所以，你可以这样做。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|172520|barplot(table(data$Device))
barplot(table(data$Text))|code-block|syntax|javascript|172521|table计算因子水平的出现次数，并将其输入条形图。|offset|length|style|CODE|172522|entityMap^0|0|0|0|5|0^^$0|@$1|2|3|4|5|6|7|O|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|P|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|Q|8|@$I|R|J|S|K|L]]|9|@]|A|$]]|$1|M|3|-4|5|6|7|T|8|@]|9|@]|A|$]]]|N|$]]

Your data frame contains two factors with raw information. A bar plot requires a number per category to plot. So, you could do this.

<pre><code>barplot(table(data$Device))
barplot(table(data$Text))
</code></pre>

<code>table</code> counts the occurrencies of the factor levels and feeds them into the bar plot.

blocks|key|2212576|text|(ggplot方法)你可以使用下面的代码：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|2212577|library(ggplot2)
data$only_Device<-gsub(".*for+","",+data$Device)
a<-table(data$only_Device)+%25>%25+as.data.frame()+%25>%25+arrange(desc(Freq))
a$Var1<-as.factor(a$Var1)
ggplot(a,+aes(x+=+reorder(Var1,+-Freq),+y+=+Freq))+%2Bgeom_bar(stat+=+"identity")|code-block|syntax|javascript|2212578|​|2212579|?|atomic|offset|length|2212580|2212581|entityMap|0|IMAGE|mutability|IMMUTABLE|imageUrl|https://ask.qcloudimg.com/http-save/yehe-900000/4f8ee2709f95d930c892cb553eb173e8.png|imageAlt^0|0|0|0|0|1|0|0|0^^$0|@$1|2|3|4|5|6|7|X|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|Y|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|Z|8|@]|9|@]|A|$]]|$1|I|3|J|5|K|7|10|8|@]|9|@$L|11|M|12|1|13]]|A|$]]|$1|N|3|H|5|6|7|14|8|@]|9|@]|A|$]]|$1|O|3|-4|5|6|7|15|8|@]|9|@]|A|$]]]|P|$Q|$5|R|S|T|A|$U|V|W|-4]]]]

(ggplot approach)
You can use below code:

<pre><code>library(ggplot2)
data$only_Device&lt;-gsub(".*for ","", data$Device)
a&lt;-table(data$only_Device) %&gt;% as.data.frame() %&gt;% arrange(desc(Freq))
a$Var1&lt;-as.factor(a$Var1)
ggplot(a, aes(x = reorder(Var1, -Freq), y = Freq)) +geom_bar(stat = "identity")
</code></pre>

<a href="https://i.stack.imgur.com/8AznD.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/8AznD.png" alt="enter image description here"></a>

blocks|key|2212568|text|如果想要绘制来自每个设备的tweet计数，可以使用{ggcharts}包中的bar_chart()。|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|2212569|data$Device+<-+as.character(data$Device)
ggcharts::bar_chart(data,+Device)|code-block|syntax|javascript|2212570|​|2212571|?|atomic|2212572|2212573|结果图是一个ggplot，因此您可以使用任何{ggplot2}函数对其进行进一步自定义。|2212574|entityMap|0|LINK|mutability|MUTABLE|url|https://thomas-neitmann.github.io/ggcharts/index.html|1|IMAGE|IMMUTABLE|imageUrl|https://ask.qcloudimg.com/http-save/yehe-900000/092271d014f210078482514735a536b3.png|imageAlt^0|P|A|12|B|P|A|0|0|0|0|0|1|1|0|0|6|6|M|9|0^^$0|@$1|2|3|4|5|6|7|16|8|@$9|17|A|18|B|C]|$9|19|A|1A|B|C]]|D|@$9|1B|A|1C|1|1D]]|E|$]]|$1|F|3|G|5|H|7|1E|8|@]|D|@]|E|$I|J]]|$1|K|3|L|5|6|7|1F|8|@]|D|@]|E|$]]|$1|M|3|N|5|O|7|1G|8|@]|D|@$9|1H|A|1I|1|1J]]|E|$]]|$1|P|3|L|5|6|7|1K|8|@]|D|@]|E|$]]|$1|Q|3|R|5|6|7|1L|8|@$9|1M|A|1N|B|C]|$9|1O|A|1P|B|C]]|D|@]|E|$]]|$1|S|3|-4|5|6|7|1Q|8|@]|D|@]|E|$]]]|T|$U|$5|V|W|X|E|$Y|Z]]|10|$5|11|W|12|E|$13|14|15|-4]]]]

If you want to plot the counts of tweets from each device you can use <code>bar_chart()</code> from the <a href="https://thomas-neitmann.github.io/ggcharts/index.html" rel="nofollow noreferrer"><code>{ggcharts}</code></a> package.

<pre class="lang-r prettyprint-override"><code>data$Device &lt;- as.character(data$Device)
ggcharts::bar_chart(data, Device)
</code></pre>

<a href="https://i.stack.imgur.com/xG7ZM.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/xG7ZM.png" alt="enter image description here"></a>

The resulting plot is a <code>ggplot</code> so you can further customize it using any <code>{ggplot2}</code> function.

Given a csv file with two columns I want to plot bar graph to show the number of tweets posted using iPhone, mac, ipad and android in decreasing order using R. Device name is embed with text problem with remove text and plot bar graph.

<pre><code>data &lt;- structure(list(Device = structure(c(1L, 1L, 2L, 
 3L, 4L, 5L), .Label = c("Twitter for iphone", "Twitter for android", "Twitter for mac", "Twitter for android", "Twitter for ipad", 
 "Twitter for android"), class = "factor"),Text = structure(c(5L, 
 3L, 6L, 4L, 2L, 1L), .Label = c("Matches is abandoned", "Policy changes in finance", 
 "Launches of new satellites", "Premium policy get activate by company abc", 
 "Technology makes trend",
 "Weather forecasting by xyz"), class = "factor")), class = "data.frame", row.names = c(NA, 
 -6L))
</code></pre>

I will get an error using R in plotting the bar graph using given dataset.

Bar chart using R

翻译质量差，导致语言生硬或混乱。

没有提供实际的解决方法或示例。

解答不清晰，无法理解或解决问题。

页面排版不美观，阅读体验差。

文章

问答

视频

学习中心

腾讯云实验室

直播

竞赛

腾讯云代码分析专区

腾讯iOA零信任安全管理系统专区

腾讯云架构师技术同盟交流圈

腾讯云数据库专区

腾讯云顾问专区

腾讯云原生专区

腾讯混元专区

腾讯云TCE专区

腾讯云Lighthouse专区

腾讯云HAI专区

腾讯云Edgeone专区

腾讯云存储专区

腾讯云智能专区

腾讯轻联专区 

腾讯云开发专区

TAPD专区

腾讯轻量云游戏服专区

腾讯云最具价值专家

腾讯云架构师技术同盟

腾讯云创作之星

腾讯云开发者先锋

腾讯云代码助手

云原生构建

TAPD 敏捷项目管理

Cloud Studio

SDK中心

API中心

命令行工具

涵盖代码开发、场景应用、自动测试全流程，助你从零构建专属AI助手

一站式MCP教程库，解锁AI应用新玩法

给定一个有两列的csv文件，我想绘制条形图，以显示使用iPhone，mac，ipad和android发布的推文数量，按降序使用R。设备名称嵌入文本问题删除文本和绘制条形图。data <- structure(list(Device = structure(c(1L, 1L, 2L, 3L, 4L, 5L...

问使用R的条形图
EN

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问使用R的条形图EN