R Language Collective

Collective Members

A leaderboard ranking Members by their contributions to the collective. Board updated daily. Last updated 2 hours ago

#		Username	Top contribution	Rep
-		You
	-	r2evans	Answer Accepted Recognizing that your use of geom_bar is just a placeholder for real data and other plot needs, I think your main ...	+416
		Friede	Answer Please have a read on the with() documentation, e.g. Note For interactive use this is very effective and nice to ...	+292
		eipi10	-	+260
4		SamR	Answer Accepted I can reproduce this on Windows if I right-click and look at the DPI in properties. It looks to me like ggplot2 is ...	+253
5	-	Tim G	Answer Moving it to an answer. I can not put it better than Allan Cameron so I will quote him here Surely this is just an ...	+241
6	-	Jon Spring	Answer Accepted Secondary axes in ggplot2 are a "decoration"; to use them, you effectively need to transform your various ...	+220
7		Allan Cameron	Answer The function s is defined with bs = "tp" as a default argument. There aren't any settings anywhere that ...	+175
8		stefan	Answer Accepted The original data passed to ggraph gets transformed by geom_edge_link, i.e. by default get_edges() is called to ...	+130
9	-	Ben Bolker	Answer dplyr::slice_max() is probably marginally more efficient, but I like dplyr::summarise() instead because it (like ...	+120
10		Gregor Thomas	Answer Accepted We can use ifelse() to switch between the two behaviors you want: ifelse(abs(x) >= 1000, round(x), sig(x, dig = ...	+90
11	-	Jan	Answer Accepted bslib::layout_sidebar defines a div which has style = css(`--_sidebar-width` = sidebar$width, ..., hence, you can ...	+90
12		Egor Glushkov	Answer Accepted If I understood the condition correctly, then it is enough to simply check the equality of two columns converted to ...	+75
13		Tripartio	Question I'm using the mgcv package in R to build generalized additive models (GAMs), and I often use cubic regression ...	+72
14		Ifeanyi Idiaye	Answer Something like this should work: # read R script code <- readLines("yourscript.R") # filter out ...	+70
15		Edward	Answer Add some if statements at the beginning to handle cases where the data frame does not contain the specified columns....	+70
16		Onyambu	Answer Accepted Try the following: fn <- function(x){ x <- ifelse(is.na(x), '.', x) paste0(iconv(x, "latin1", &...	+55
17		Konrad Rudolph	Answer Accepted You are on the right track with rlang::inject(). But note that the documentation states that You can use {{ arg }} ...	+55
18		Dirk is no longer...	-	+50
19		Jilber Urbina	Answer As an alternative to @Friede answer, you can use slice_max from dplyr package > slice_max(totalN, ...	+50
20		Gavin Simpson	-	+50
21		Jaap	-	+50
22		M--	Answer Accepted I think we can fix this with a little more css: body { background: url(https://linesteppers.com/tutorials/...	+43
23		Spacedman	-	+40
24		Z.Lin	-	+40
25		MrFlick	-	+40
26		teunbrand	-	+40
27		Rui Barradas	Answer Here is a function that answers the question and is 5 times faster. Start by extracting the columns to be ...	+40
28		bretauv	-	+35
29		Andre Wildberg	Answer Accepted An approach using lapply. sub("-.*", ...) gets the year-part of the date by replacing everything (any ...	+35
30		Patrick	-	+35
31		Moohan	Answer Accepted Basically the same as davearmstrong's comment but using tidyverse. library(dplyr) mydata <- mydata \|> ...	+35
32		FJCC	Answer Accepted Your desired result has no column names, which can't be done in a tibble, as far as I know. Also, do you really ...	+35
33		rcs	-	+30
34		bschneidr	-	+30
35	-	Robert Long	-	+30
36		Didzis Elferts	-	+30
37		Mikko Marttila	-	+30
38		Dason	-	+30
39		Michael Dewar	Answer Suppose you have the following intermediate data library(tidyverse) intermediate <- tibble(event_code = c(101, ...	+25
40		GuedesBF	-	+25
41		benson23	-	+22
42		TarJae	Question I'm building a Quarto dashboard with format: dashboard and server: shiny. I'm comparing value boxes that are: ...	+22
43		AtilaSol	Question I'm using the arules and arulesViz packages in R to generate and visualize association rules. When I use plot() ...	+22
44		moodymudskipper	-	+20
45		Yihui Xie	-	+20
46		jared_mamrot	Answer It looks like some of the values in length_df$Comparison aren't in desired_order; if you add the 'missing' values ...	+20
47		jan-glx	-	+20
48		G5W	-	+20
49		Marco Sandri	-	+20
50		joran	-	+20