NotificationsYou must be signed in to change notification settings
Fork0
Star5

Commit747a23a

committed

add utf8_number_heart()

add utf8_number_circle()

1 parentd270025 commit747a23aCopy full SHA for 747a23a

File tree

5 files changed

+80

-2

lines changed

5 files changed

+80

-2

lines changed

`‎NAMESPACE‎`

Lines changed: 2 additions & 0 deletions

Original file line number	Diff line number	Diff line change
`@@ -4,6 +4,8 @@ export(utf8_block)`
`4`	`4`	`export(utf8_collection)`
`5`	`5`	`export(utf8_inspect)`
`6`	`6`	`export(utf8_number_box)`
	`7`	`+export(utf8_number_circle)`
	`8`	`+export(utf8_number_heart)`
`7`	`9`	`export(utf8_number_star)`
`8`	`10`	`export(utf8_text_bold)`
`9`	`11`	`export(utf8_text_bold2)`

`‎R/utf8ify.R‎`

Lines changed: 35 additions & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -179,13 +179,28 @@ utf8_number_box <- function(num) {`
`179`	`179`
`180`	`180`	`}# as_utf8_number_box()`
`181`	`181`
	`182`	`+#' Format number circled using unicode`
	`183`	`+#'`
	`184`	`+#' @param num Number`
	`185`	`+#' @return Unicode text`
	`186`	`+#' @examples`
	`187`	`+#' utf8_number_box(123.45)`
	`188`	`+#' @export`
	`189`	`+`
	`190`	`+utf8_number_circle<-function(num) {`
	`191`	`+`
	`192`	`+ utf8_text_circle(as.character(num))`
	`193`	`+`
	`194`	`+}# as_utf8_number_circle()`
	`195`	`+`
	`196`	`+`
`182`	`197`	`#' Format number as stars using unicode`
`183`	`198`	`#'`
`184`	`199`	`#' @param num Number`
`185`	`200`	`#' @param max_num Maximum number`
`186`	`201`	`#' @return Unicode text`
`187`	`202`	`#' @examples`
`188`		`-#'utf8_number_box(123.45)`
	`203`	`+#'utf8_number_star(123.45)`
`189`	`204`	`#' @export`
`190`	`205`
`191`	`206`	`utf8_number_star<-function(num=5,max_num=10) {`
`@@ -198,6 +213,25 @@ utf8_number_star <- function(num = 5, max_num = 10) {`
`198`	`213`
`199`	`214`	`}`
`200`	`215`
	`216`	`+#' Format number as hearts using unicode`
	`217`	`+#'`
	`218`	`+#' @param num Number`
	`219`	`+#' @param max_num Maximum number`
	`220`	`+#' @return Unicode text`
	`221`	`+#' @examples`
	`222`	`+#' utf8_number_heart(3)`
	`223`	`+#' @export`
	`224`	`+`
	`225`	`+utf8_number_heart<-function(num=5,max_num=10) {`
	`226`	`+`
	`227`	`+n<- round(num,0)`
	`228`	`+if(n<0) {n<-0 }`
	`229`	`+if(n>max_num) {n<-max_num}`
	`230`	`+`
	`231`	`+ paste0(rep("\U2764\UFE0F",n),collapse="")`
	`232`	`+`
	`233`	`+}`
	`234`	`+`
`201`	`235`	`#' Collection of unicode symbols`
`202`	`236`	`#'`
`203`	`237`	`#' @return List of unicode collections`

`‎man/utf8_number_circle.Rd‎`

Lines changed: 20 additions & 0 deletions

Some generated files are not rendered by default. Learn more aboutcustomizing how changed files appear on GitHub.

`‎man/utf8_number_heart.Rd‎`

Lines changed: 22 additions & 0 deletions

Some generated files are not rendered by default. Learn more aboutcustomizing how changed files appear on GitHub.

`‎man/utf8_number_star.Rd‎`

Lines changed: 1 addition & 1 deletion

Some generated files are not rendered by default. Learn more aboutcustomizing how changed files appear on GitHub.

0 commit comments

Comments

(0)

Movatterモバイル変換

Navigation Menu

Search code, repositories, users, issues, pull requests...

Provide feedback

Saved searches

Use saved searches to filter your results more quickly

Uh oh!

Commit747a23a

File tree

5 files changed

5 files changed

`‎NAMESPACE‎`

`‎R/utf8ify.R‎`

`‎man/utf8_number_circle.Rd‎`

`‎man/utf8_number_heart.Rd‎`

`‎man/utf8_number_star.Rd‎`

0 commit comments