發表文章

目前顯示的是 1月 14, 2019的文章

Council of Hertford

圖片
The Council of Hertford was the first general council of the Anglo-Saxon Church. [1] It was convened in Anglo-Saxon Herutford, most likely modern Hertford, in 672 by Theodore of Tarsus, Archbishop of Canterbury. [2] The Venerable Bede is the historical source for this council, as he included its text in his Ecclesiastical History of the English People. [3] The council was attended by a number of bishops from across Anglo-Saxon England. Bede also records royal attendance, as King Ecgfrith of Northumbria was present. [4] The Council of Hertford acted as a milestone in the organisation of the Anglo-Saxon Church, as the decrees passed by its delegates focused on issues of authority and structure within the church. [5] The council helped achieve unification in the English Church. Icon of Theodore, Archbishop of Canterbury. Contents 1 Attendees 2 Dating 3 Location 4 Proceedings 5 Creed 6 Significance 7 References 7.1 Primary sources 7.2 ...

Count unique characters present in a group of columns

圖片
1 I have the following dataset dat <- data.frame(group = c(1,1,1,1,1), id = c(1,2,3,4,5), t1 = c('a','a','b','b','c'),p1 = c(0.98,1,0.5,0.9,1), t2 = c('b',NA,'a','c',NA),p2 = c(0.02,NA,0.25,0.10,NA), t3 = c(NA,NA,'c',NA,NA),p3 = c(NA,NA,0.25,NA,NA)) I am trying to count the number of unique characters present across multiple columns (t1,t2,t3) in a group encompassing multiple rows (variable = 'group'). Whether or not each character is counted depends on the associated p1,p2,p3 values being >= 0.05. I have tried entering this code to count unique characters from all columns b <- dat %>% group_by(group) %>% mutate(total = sum(n_distinct(t1[p1 >= 0.05], na.rm = TRUE)...