blocks|key|4622724|text|大多数设计用于处理向量的函数也接受矩阵，但返回的是向量而不是矩阵：paste、sprintf等。您可以使用apply，它将返回一个矩阵。|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|4622725|apply(+
++prop.table(m,1)*100,+
++2,+
++function(u)+sprintf(+"%25.1f%25%25",+u+)+
)|code-block|syntax|javascript|4622726|entityMap^0|X|5|13|7|1H|5|0|0^^$0|@$1|2|3|4|5|6|7|M|8|@$9|N|A|O|B|C]|$9|P|A|Q|B|C]|$9|R|A|S|B|C]]|D|@]|E|$]]|$1|F|3|G|5|H|7|T|8|@]|D|@]|E|$I|J]]|$1|K|3|-4|5|6|7|U|8|@]|D|@]|E|$]]]|L|$]]

Most functions designed to work with vectors also accept matrices but return a vector instead of a matrix: <code>paste</code>, <code>sprintf</code>, etc.
You can use <code>apply</code>, that will return a matrix.

<pre><code>apply( 
 prop.table(m,1)*100, 
 2, 
 function(u) sprintf( "%.1f%%", u ) 
)
</code></pre>

blocks|key|524402|text|另一种解决方案可能是替换矩阵的内容：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|524403|m2+<-+m
m2[]+<-+sprintf("%25.1f%25%25",round(prop.table(m,1)*100,+3))
m2
#+++C+++++++D++++++
#+A+"25.0%25"+"75.0%25"
#+B+"33.3%25"+"66.7%25"|code-block|syntax|javascript|524404|entityMap^0|0|0^^$0|@$1|2|3|4|5|6|7|I|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|J|8|@]|9|@]|A|$E|F]]|$1|G|3|-4|5|6|7|K|8|@]|9|@]|A|$]]]|H|$]]

Another solution could be replacing content of matrix:

<pre><code>m2 &lt;- m
m2[] &lt;- sprintf("%.1f%%",round(prop.table(m,1)*100, 3))
m2
# C D 
# A "25.0%" "75.0%"
# B "33.3%" "66.7%"
</code></pre>

blocks|key|4622758|text|有一个名为janitor的包，它解决了prop.table()“格式为百分比”的问题。这里有一个包的链接：https://github.com/sfirke/janitor|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|4622759|这里有一个来自github页面的使用示例。|4622760|roster+%25>%25
++tabyl(employee_status,+full_time)+%25>%25
++adorn_totals("row")+%25>%25
++adorn_percentages("row")+%25>%25
++adorn_pct_formatting()+%25>%25
++adorn_ns()+%25>%25
++adorn_title("combined")
#>++employee_status/full_time+++++++++No++++++++Yes
#>+++++++++++++Administration+++0.0%25+(0)+100.0%25+(1)
#>++++++++++++++++++++++Coach+100.0%25+(2)+++0.0%25+(0)
#>++++++++++++++++++++Teacher++33.3%25+(3)++66.7%25+(6)
#>++++++++++++++++++++++Total++41.7%25+(5)++58.3%25+(7)|code-block|syntax|javascript|4622761|entityMap|0|LINK|mutability|MUTABLE|url|https://github.com/sfirke/janitor^0|5|7|J|C|1H|X|0|0|0|0^^$0|@$1|2|3|4|5|6|7|U|8|@$9|V|A|W|B|C]|$9|X|A|Y|B|C]]|D|@$9|Z|A|10|1|11]]|E|$]]|$1|F|3|G|5|6|7|12|8|@]|D|@]|E|$]]|$1|H|3|I|5|J|7|13|8|@]|D|@]|E|$K|L]]|$1|M|3|-4|5|6|7|14|8|@]|D|@]|E|$]]]|N|$O|$5|P|Q|R|E|$S|T]]]]

There's a package called <code>janitor</code> that takes care of the <code>prop.table()</code> "format-as-percentage" problem. Here's a link to the package: <a href="https://github.com/sfirke/janitor" rel="noreferrer">https://github.com/sfirke/janitor</a>

Here's a usage example from the github page. 

<pre><code>roster %&gt;%
 tabyl(employee_status, full_time) %&gt;%
 adorn_totals("row") %&gt;%
 adorn_percentages("row") %&gt;%
 adorn_pct_formatting() %&gt;%
 adorn_ns() %&gt;%
 adorn_title("combined")
#&gt; employee_status/full_time No Yes
#&gt; Administration 0.0% (0) 100.0% (1)
#&gt; Coach 100.0% (2) 0.0% (0)
#&gt; Teacher 33.3% (3) 66.7% (6)
#&gt; Total 41.7% (5) 58.3% (7)
</code></pre>

blocks|key|525022|text|这是@VincentZoonekynd答案的扩展，它增加了边距(行/列的总计)并删除了双引号：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|525023|library(magrittr)

m+%25>%25
++prop.table+%25>%25
++addmargins+%25>%25
++apply(MARGIN=2,+FUN=scales::percent,+accuracy=0.1)+%25>%25
++noquote

#>+++++C+++++D+++++Sum+++
#>+A+++10.0%25+30.0%25+40.0%25+
#>+B+++20.0%25+40.0%25+60.0%25+
#>+Sum+30.0%25+70.0%25+100.0%25|code-block|syntax|javascript|525024|entityMap^0|0|0^^$0|@$1|2|3|4|5|6|7|I|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|J|8|@]|9|@]|A|$E|F]]|$1|G|3|-4|5|6|7|K|8|@]|9|@]|A|$]]]|H|$]]

This is an extension of the answer from @VincentZoonekynd that adds margins (totals for rows/columns) and removes the double quotes:

<pre><code>library(magrittr)

m %&gt;%
 prop.table %&gt;%
 addmargins %&gt;%
 apply(MARGIN=2, FUN=scales::percent, accuracy=0.1) %&gt;%
 noquote

#&gt; C D Sum 
#&gt; A 10.0% 30.0% 40.0% 
#&gt; B 20.0% 40.0% 60.0% 
#&gt; Sum 30.0% 70.0% 100.0%
</code></pre>

I'm trying to append % sign in the output of <code>prop.table</code> to use in <code>Sweave</code>. My attempted code is below:

<pre><code>m &lt;- matrix(1:4,2)
dimnames(m) &lt;- list(c("A", "B"), c("C", "D"))
prop.table(m,1)*100

 C D
A 25.00000 75.00000
B 33.33333 66.66667


paste(round(prop.table(m,1)*100, 3), "%", sep = "")
[1] "25%" "33.333%" "75%" "66.667%"


paste(sprintf("%.1f", prop.table(m,1)*100), "%", sep = "")
[1] "25.0%" "33.3%" "75.0%" "66.7%"
</code></pre>

Using <code>paste</code> will change the class from matrix to character. I'd highly appreciate if someone guide me the right solution. Thanks

Appending % sign in output of prop.table

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

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

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

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

文章

问答

视频

学习中心

腾讯云实验室

直播

竞赛

腾讯云代码分析专区

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

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

腾讯云数据库专区

腾讯云顾问专区

腾讯云原生专区

腾讯混元专区

腾讯云TCE专区

腾讯云Lighthouse专区

腾讯云HAI专区

腾讯云Edgeone专区

腾讯云存储专区

腾讯云智能专区

腾讯轻联专区 

腾讯云开发专区

TAPD专区

腾讯轻量云游戏服专区

腾讯云最具价值专家

腾讯云架构师技术同盟

腾讯云创作之星

腾讯云开发者先锋

腾讯云代码助手

云原生构建

TAPD 敏捷项目管理

Cloud Studio

SDK中心

API中心

命令行工具

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

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

为了在Sweave中使用，我尝试在prop.table的输出中附加%符号。我尝试的代码如下：m <- matrix(1:4,2)dimnames(m) <- list(c("A", "B"), c("C", "D"))prop.table(m,1)*100 C DA 25.00000 75...

问在prop.table的输出中追加% sign
EN

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问在prop.table的输出中追加% signEN