小编Pir*_*mer的帖子

我觉得data.table这个问题必须有一个简单的解决方案。我有以下数据：

library(data.table)

data <- data.table(
    id = c(1,1,1,2,2,3),
    income_year0 = c(NA,NA,100,NA,200,NA),
    income_year1 = c(NA, 105, NA, 202,NA, 255),
    income_year2 = c(102, NA,NA,NA,NA,NA)
)

我想为每个唯一的 id 创建一个新的列收入，该列的值是income_year0（如果不是NA），否则是值income_year1（如果不是 NA），否则是 值income_year2，如果都是 NA，则收入是 NA。

也就是说，我希望每个 id 一行有一个收入列，如下所示：

data_want <- data.table(
    id = c(1,2,3),
    income = c(100,200,255)
)

我有一个错误说Can't import 'UseSelector' from react-redux. 我正在做的是一个名为“入门”的小项目，我正在使用 firebase 并做出反应来执行此操作，这是出现错误的代码文件

import React from 'react';
import ReactDOM from 'react-dom';
import './index.css';
import App from './App';
import * as serviceWorker from './serviceWorker';
import { createStore, applyMiddleware, compose } from 'redux';
import rootReducer from './store/reducers/rootReducer'
import { Provider } from 'react-redux'
import thunk from 'redux-thunk'
import {createFirestoreInstance, reduxFirestore, getFirestore } from 'redux-firestore'
import { ReactReduxFirebaseProvider, getFirebase, reactReduxFirebase } from 'react-redux-firebase';
import firebase from 'firebase/app'
import fbConfig from './config/fbConfig'
import { useSelector …