समस्या: x-axis के कारक फिर से समतल नहीं हो रहे हैं
मान लें कि मेरे पास यह बॉक्सप्लॉट है
इन आंकड़ों के साथ उत्पन्न:
set.seed(1)
y <- data.frame(loglos = log2(runif(1000)),
corona = as.factor(c(rep("C19", 50), rep("Normal", 50))),
type = as.factor(c("Vascular", "Hydro"....
दिए गए कॉलम को '_sales' के साथ सारांशित करके नया कॉलम कैसे बनाएं?
नीचे दिया गया कोड: md %>% rowwise()%>% mutate(sub_total=across(contains("_sales"),sum)) का परिणाम वह नहीं है जो मैं चाहता हूं। md$sub_total <- md$a_sales+md$b_sales+md$d_sales काम कर सकता है, लेकिन थोड़ा जटिल है जब दिए गए कॉलम वर्तमा....
मुझे चमकदार डैशबोर्ड बॉक्स के ऊपरी दाएं कोने पर एक एक्शन बटन आइकन की आवश्यकता होगी। नीचे दिया गया कोड 'टाइटल 1' के बगल में 'रीफ्रेश' और 'प्लस' आइकन जोड़ता है। हालांकि, मुझे हेडर बार के दाहिने तरफ के अंत में आइकन रखने की आवश्यकता होगी (विंडोज़ एप्लिकेशन में कम से कम, पुनर्स्थापित और बंद करें बटन की....
26 नवम्बर 2021, 10:18
मेरे पास "अवधि" [एचएमएस पैकेज] वर्ग का एक समय स्तंभ है; मैं उस कॉलम का क्वांटाइल कैसे ढूंढूं? मैंने सेकंड में कनवर्ट करने और उस 10वें प्रतिशतक मान को बाहर निकालने की कोशिश की है, फिर df[df$time == 10thPerc,] करके रुचि के व्यक्ति के नाम को फ़िल्टर करने का प्रयास किया है। मैं सोच रहा हूं कि क्या कु....
26 नवम्बर 2021, 01:16
#size of 10
sd1<-matrix(0,nrow=10,ncol=100)
for (i in 1:100){
sd1[,i]<-rnorm(10, 0, 1)
}
x1<-apply(sd1,MARGIN=2,FUN=mean)
x10<-mean(x1)
cat('x10=',x10)
Size of 100
sd2<-matrix(0,nrow=100,ncol=100)
for (i in 1:100){
sd2[,i]<-rnorm(100)
}
x2<-apply(sd2,MARGIN=2,FUN=mean)
x100<-mean(x2)
cat('x1....
मैं काफी संक्षिप्त, अधिक पठनीय आर कोड लिखना चाहता हूं। मैं बहुत लंबे कोड होने से बचने के लिए हर बार लाइन में जाने की कोशिश करता हूं। मैंने देखा है कि grepl में OR ऑपरेटर के बाद मैं लाइन पर जाता हूं या नहीं, इसके आधार पर मेरे अलग-अलग परिणाम होते हैं। और यह मुझे परेशान करता है
उदाहरण के लिए इस कोड ....
25 नवम्बर 2021, 12:10
मैं कॉलम के लिए शून्य पंक्ति-वार के असमान दो मानों के बीच 0 के मानों को प्रक्षेपित करने का प्रयास करता हूं: आर में data.table के 2018 से 2021 तक। इस प्रकार एक नमूना डेटा df1 इस तरह दिखेगा:
ID string1 2018 2019 2020 2021 string2
1: a1 x2 3 3 0 4 si
2: a2 g3 5 5 ....
25 नवम्बर 2021, 11:28
DF1 = data.frame(A=c("cats","dogs","pig"), B=c("kittens","puppies","pig"),C=c("dog","cat","mouse"))
DF2 = data.frame( A=c("cats","dogs","pig"), B=c("kittens",NA,NA))
दूसरे DF2 में NA कॉलम है लेकिन मुझे NA को 1 कॉलम की पिग रो से बदलने की जरूरत है। इसे NA की पंक्ति से DF1 की पंक्ति से मेल खाना चाहि....
25 नवम्बर 2021, 11:10
मैं ggplot2 के साथ आर में अपने स्कैटरप्लॉट में एक ट्रेंडलाइन जोड़ने की कोशिश कर रहा हूं।
> ggplot(df_scatter, aes(x=new_cases, y=people_fully_vaccinated,color=Country)) + geom_point()+ geom_smooth(method="lm")
मैं देश के सापेक्ष अलग-अलग बिंदुओं के रंग के साथ स्कैटरप्लॉट प्राप्त करने में सक्षम हूं,....
25 नवम्बर 2021, 10:33
मेरे पास निम्न डेटा है:
df <- data.frame(dt1 = c("2019-05-02", "2019-01-02", "2019-06-02"),
dt2 = c("2019-08-30", "2019-04-24", "2019-12-06") )
> df
dt1 dt2
1 2019-05-02 2019-08-30
2 2019-01-02 2019-04-24
3 2019-06-02 2019-12-06
यहाँ मैं क्या करना चाहता हूँ:
....
मैं आर के लिए नया हूं। मुझे आर में एक मैट्रिक्स बनाने की जरूरत है जिसके पहले कॉलम में संख्याएं 6,7,8,9 हैं और जिनके दूसरे कॉलम में पहले कॉलम में संख्याओं के वर्ग हैं।....
मैंने लापता तिथियों की पहचान की है, लेकिन मुझे उन्हें "तारीख" कॉलम में डालने की जरूरत है और डेटा फ्रेम में सभी संबंधित कॉलम के लिए एनए डालना होगा।
DF <- data.frame(Year = rep(1985, 4),
Month = rep(1, 4),
Day = c(1,2,5,6),
Z = 7:10)
colnames(DF)[4]....
25 नवम्बर 2021, 00:45
मुझे डेटा सेट करना है, जिसके नमूने मैंने नीचे दिए हैं। मुझे target_df$project_name में प्रोजेक्ट नामों को बदलने की जरूरत है, अगर वे registry_df$to_change में registry_df$replacement में संबंधित मानों के साथ मौजूद हैं। हालांकि, मैंने जिस कोड की कोशिश की, जाहिर है, उसने कोई परिणाम नहीं दिया। इसे कै....
24 नवम्बर 2021, 13:10
मैं यह सरल साजिश बना रहा हूँ
plot(data.frame(a=c(0.5,1,1.5,2,2.5,3,3.5,4),
b=c(0.01,0.02,0.03,0.04,0.05,0.06,0.07,0.08)))
मुझे ggplot2 पर अक्ष दशमलव संकेतक को अल्पविराम बनाने के बारे में बहुत सारे प्रश्न प्रतीत होते हैं, लेकिन आधार R पर कोई नहीं मिला। मैं कुछ ऐसा सोच रहा हूं जो डे....
24 नवम्बर 2021, 08:23
मेरे पास दौड़ से टाइमस्टैम्प का एक कॉलम है; समय लॉग या तो एचएच: एमएम: एसएस प्रारूप या एमएम: एसएस प्रारूप में दिए गए हैं। मुझे उन्हें चरित्र से समय प्रारूप में बदलने की जरूरत है; मैं as.POSIXct का उपयोग करूंगा लेकिन पहले मुझे उन अवलोकनों से निपटने में समस्याएं आ रही हैं जहां प्रारूप एमएम: एसएस एचए....
24 नवम्बर 2021, 08:12
निम्नलिखित पर विचार करें dt:
dt <- data.table(a=c(1,1,2,3),b=c(4,5,6,4))
ऐसा दिखता है:
> dt
a b
1: 1 4
2: 1 5
3: 2 6
4: 3 4
मैं यहां प्रत्येक कॉलम को उसके अनूठे मूल्यों से जोड़ रहा हूं और फिर गिन रहा हूं कि प्रत्येक कॉलम में कितने विशिष्ट मूल्य हैं:
> dt[,lapply(.SD,function(agg) dt[,.N,by=agg....
24 नवम्बर 2021, 07:02
मैं तार में चरित्र प्रतिस्थापन के साथ एक विशिष्ट समस्या है:
अगर मेरे पास निम्नलिखित तार हैं
"..A.B....c...A..D.."
"A..S.E.Q.......AW.."
".B.C..a...R......Ds"
डॉट्स को बदलने और निम्नलिखित स्ट्रिंग्स प्राप्त करने के लिए मुझे किस रेगेक्स प्रतिस्थापन का उपयोग करना चाहिए:
"A_B_c_A_D"
"A_S_E_Q_AW"
"B_C_a....
22 नवम्बर 2021, 17:28
मैं रीशेपिंग को वाइड बैक से लॉन्ग फॉर्मेट में उलट देना चाहता हूं, लेकिन मैं ढेर हूं कि मुझे कैसे आगे बढ़ना चाहिए ताकि a1_* के मानों को a1 में रखा जा सके। क्या इसका कोई उपाय है?
library(tidyverse)
df <- tibble(
id = c("s001", "s002", "s002", "s003", "s003",
"s004", "s005"),
a1 = c....
मेरे पास एक 3-आयामी सरणी है x और प्रत्येक तत्व के शेयर a की गणना करना चाहते हैं w.r.t. तीसरा आयाम:
मैंने आर में निम्नलिखित की कोशिश की लेकिन यह "गैर-अनुरूपता योग्य सरणी" (जो निश्चित रूप से समझ में आता है) के कारण काम नहीं करता है।
x <- array(
data = 1:8,
dim = c(2, 2, 2),
dimnames = list(i ....
मैं मैट्रिक्स कॉलम पर लूप करने की कोशिश कर रहा हूं।
date <- rbind("2000-01-01", "2000-01-02", "2000-01-03", "2000-01-04", "2000-01-05", "2000-01-06", "2000-01-07", "2000-01-08", "2000-01-09", "2000-01-10", "2000-01-11", "2000-01-12")
a1 <- rbind("0", "0", "0", "0", "6421", "41", "5667", "44", "1178"....
मेरे पास टैक्टिक (मछली की शिकारी प्रजातियों के लिए प्रवासी रणनीति) नामक एक चर है जिसमें तीन स्तर होते हैं यानी "माइगर", "ओसीआरईएस", "एस्ट्रेस" नीचे डेटा देखें:
combo1 <- structure(list(Sex = c("F", "M", "F", NA, "M", "F", NA, NA, "M",
"F", NA, "M", "F", "F", NA, "F", "F", NA, "M", "F", NA, "M",
"F....
मैं एक ही चमकदार खिड़की में कई भूखंड बनाने की कोशिश कर रहा हूँ। निश्चित नहीं कि मुझसे कौन सी गलती हो रही है। यह एक त्रुटि देता है कि मेरे मुख्य पैनल में कुछ गड़बड़ है।
मैंने कुछ अलग चीजों की कोशिश की लेकिन कुछ भी काम नहीं कर रहा है। बीटीडब्ल्यू यह इस प्रश्न के माइक के उत्तर का एक अनुकूलन है कई भ....
22 नवम्बर 2021, 03:17
जब नीचे दिखाए गए अनुसार selectInput() मान का चयन नहीं किया गया है, तो मैं उपयोगकर्ताओं को दृष्टि से सचेत करना चाहता हूं। इस फ़ोरम में इस के अलावा कोई समाधान नहीं खोजा जा सका लेकिन पूछना अलग है।
....
यह कोड मुझे एक टैब देता है। मैं कुछ भूखंड बनाने के लिए इसमें और टैब जोड़ने में सक्षम होना चाहता हूं, कुल कार्य का उपयोग हो सकता है। मैं अपने tabsetPanel( के अंदर एक दूसरी tabPanel( वस्तु जोड़ने के लिए थक गया लेकिन काम नहीं किया।
अगर कोई इसमें मेरी मदद कर सकता है तो मैं आभारी रहूंगा
library(shiny)
....
इस उदाहरण डेटा के साथ
c(5, 5, 5, 10, 20, 25, 25, 25, 30, 30)
मैं इसे एक बार चार्ट में कैसे प्लॉट कर सकता हूं जो एक्स अक्ष (5 से 30) पर एक सीमा दिखाता है और वाई सभी मूल्यों का प्रतिशत दिखाता है> = प्रत्येक अंतराल।
यानी पहला बार 100% होगा क्योंकि सभी मान 5 के बराबर या उससे ऊपर हैं, अगला मान 70% >= 10....